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

Question

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

Answer 1

//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.

Comments

однако, не работает