Запишите на языке паскаль программу решения задачи. Считайте количество жильцов дома случайным числом из диапазона от 50 до 200 человек, а число домов n=30.
Var
i:integer;
begin
randomize;
writeln(Количество жильцов:);
for i:=1 to 30 do
writeln(Дом ,i, - ,random(151)+50);
end.
Оцени ответ
