program HouseResidents;

var
n, totalResidents, randomResidents, i: integer;

begin
randomize;
n := 30;
totalResidents := 0;

for i := 1 to n do
begin
randomResidents := random$151$ + 50;
writeln${}^{\prime }Numberofresidentsinhous{e}^{\prime },i{,}^{\prime }{:}^{\prime },randomResidents$;
totalResidents := totalResidents + randomResidents;
end;

writeln${}^{\prime }Totalnumberofresidentsinallhouses{:}^{\prime },totalResidents$;
end.