Составить программу на определение суммы элементов массива (одномерный двумерный)

Question

Информатика

Миша

29 августа, 16:49

Составить программу на определение суммы элементов массива (одномерный двумерный)

+4

Ответы (1)

Знаете ответ на вопрос?

Лавреня · Answer 1

Вот программа для массива состоящих, например из 7 чисел

var

a:array[1 ... 7]of integer;

i, n, m:integer;

begin

m:=0;

Writeln ('введите числа:') ;

For i:=1 to 7 do

Readln (a[i]) ;

for i:=1 to 7 do

m:=a[i]+m;

writeln (m) ;

end.