Вычисление суммы элементов массива. Написание программ, реализующих алгоритмы вычисления суммы элементов массива​

//Pascal ABC.NET 3.8.2

var

 arr : array[1..10] of integer;

 sum : integer;

 begin

   sum := 0;

   write('Сгенерированный массив: ');

   for var i := 1 to 10 do

   begin

     arr[i] := random(10);

     sum := sum +arr[i];

     write(arr[i], ' ');

   end;

   writeln;

   write('Сумма элементов массива:', sum);

 end.