Дан массив целых чисел размерностью n (n=16), найти сумму первых пяти элементов массива
Сделать в Паскале

program mass;

const n = 16;

var A: array [1..n] of integer;

i, sum : integer;

begin

writeln ('Vash massiv: ');

for i:=0 to n do A[i]:= random(10);

for i:=0 to n do write(A[i], ' ');

sum:=0;

for i:=0 to 5 do sum:=sum + a[i];

writeln();

writeln('s = ', sum);

end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.