Напиши программу в Pascal, которая заполняет массив Rost длиной 12 случайными числами от 150 до 180

Question

Настюха

10 ноября, 14:49

+3

Ответы (1)

Знаете ответ на вопрос?

Аэлита · Answer 1

Var rost: array [1 ... 12] of integer;

i: integer;

begin

for i:=1 to 12 do

begin

rost[i]:=random (30) + 150;

write (rost[i]:5) ;

end;

end.