Составьте программу расчета суммы элементов в массиве из 10 случайных чисел

Question

Информатика

Зульхая

23 марта, 15:45

Составьте программу расчета суммы элементов в массиве из 10 случайных чисел

+4

Ответы (1)

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

Эдгар · Answer 1

Program abc; var a: array [0 ... 9] of integer; i: integer; summ:integer;

begin

for i:=0 to 9 do begin a[i]:=random (100) ;

end; summ: = 0;

for i:=0 to 9 do begin summ:=summ+a[i];

end; writeln (summ) ;

end.