Question

ПОМОГИТЕ, ПОЖАЛУЙСТА ⇒ напишите текст программы по суммированию всех чисел в массиве из 20 чисел, заполненных случайных числами. информатика 9 класс

Answer 1

Var i, sum: integer;mas:array[1..20] of integer;beginrandomize;For i:=1 to 20 do beginmas[i] := random(100);write(mas[i], ',');sum := sum + mas[i];end;writeln('Sum = ', sum);end.