Найти сумму элементов массива состоящего из n элементов элементы вводятся случайным образом.
На PascalABC

Вот программа для нахождения суммы 10 чисел массива которые вводятся с клавиатуры произвольным образом ,так же можно самому генерировать случайные числа в массиве и находить их сумму код для этой программы на 2 фото)

program znru;

uses crt;

var a:array [1..10000] of integer;

n,i,sum: integer;

begin

clrscr;

randomize;

write('N = ');readln(n);

write ('A = [ ');

for i:=1 to n do begin

a[i]:=random(10);

write(a[i],' '); end;

writeln(']');

for i:=1 to n do sum:=sum+a[i];

writeln('Summa = ',sum);

end.