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

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

срочно(

Задать свой вопрос
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.

София Дерванова
но, не работает
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт