Запишите на языке паскаль программу решения задачи. Считайте количество жильцов дома случайным числом из диапазона от 50 до 200 человек, а число домов n=30.

Question

Юраша

24 марта, 00:31

+1

Ответы (1)

Знаете ответ?

Гуся · Answer 1

Var

i:integer;

begin

randomize;

writeln ('Количество жильцов:') ;

for i:=1 to 30 do

writeln ('Дом ', i,' - ', random (151) + 50) ;

end.