Найти сумму и количество элементов в массиве T - Pascal
Формулировка задачи:
Найти сумму и количество элементов в массиве T
Решение задачи: «Найти сумму и количество элементов в массиве T»
textual
Листинг программы
sum:=0; for i:=1 to n do sum:=sum+t[i]; writeln(sum);
Объяснение кода листинга программы
- Создается переменная
sumи ей присваивается значение 0. - Запускается цикл
forc переменнойiот 1 доn. - На каждой итерации значение
t[i]складывается с текущим значением переменнойsum. - Выводится значение переменной
sumс помощью процедурыwriteln.