Написать програму на paskal: 15 элементов массива рандомно в диапазоне от 50 до 100, вывод суммы элементов

Лиза090401 Лиза090401    2   26.04.2020 12:31    0

Ответы
seydchubra seydchubra  13.10.2020 21:33

var

a: array [1..15] of byte;

i:byte;

begin

Randomize;

for i:=1 to 15 do

a[i]:=random(101)+50;

for i:=1 to 15 do

write(a[i],' ');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика