Найти произведение элементов главной диагонали массива - Pascal
Формулировка задачи:
Найти произведение элементов главной диагонали массива размером NxN, элементы которого вводятся с клавиатуры.
Решение задачи: «Найти произведение элементов главной диагонали массива»
textual
Листинг программы
p:=1; for i:=1 to n do p:=p*a[i,i];
Объяснение кода листинга программы
- Создается переменная
p
и ей присваивается значение 1. - Запускается цикл
for
от 1 доn
. - В цикле переменная
p
умножается на значение элемента массиваa
с индексами [i, i].
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д