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

vari:integer;begin  randomize;  writeln('Количество жильцов:');  for i:=1 to 30 do  writeln('Дом ',i,' - ',random(151)+50);end.