ДАЮ 80 БАЛЛОВ
Написать программу, которая:
1. заполняет массив из 5 чисел вводом с
клавиатуры
2. Выводит его на экран
3. и находит сумму элементов этого
массива

на PascalABC.NET:

var

 a: array [1..5] of integer;

 S: integer;

begin

 writeln('Введите элементы массива (5) :');

 for var i := 1 to 5 do

   read(a[i]);

 S := 0;

 for var i := 1 to 5 do

 begin

   S := S + a[i];

 end;

 writeln('Сумма всех элементов массива: ', S);

end.