Question

помогите ПРОШУУУУУУУ

Напишите программу(Паскаль) нахождения суммы элементов массива А[1:5], заполненного числами 2, 6, 8, 12, 18.

Answer 1

var
   a: array [1..5] of integer := (2,6,8,12,18);
   sum: integer := 0;
begin
writeln('Элементы массива a: ');
for var i:=1 to aN do
  write(a[i],' ');
  sum = sum + a[i];
writeln;
writeln('Сумма элементов: ', sum);
end.

Answer 2

for var i:=1 to aN do - здесь надо aN на 5 исправить. поспешил.

Answer 3

повторно объявленный идентификатор а

Answer 4

надо еще i: integer := 0; в вар записать, забыл