Задать массив из 9 эллементов случайным образом от 50 до 60 вывести в столбик найти сумму эллементо массива (

//PascalABC.NET v3.3 1633

var arr: array [1..9] of byte;

begin

 for var i:=1 to 9 do

   arr[i]:=random(50,60);

 for var i:=1 to 9 do

   writeln(arr[i]);

 var sum:=0;

 for var i:=1 to 9 do

   sum += arr[i];

 writeln('Сумма эл. массива: '+sum);

end.