Question

В некотором населённом пункте n=25 домов. Считайте жильцов дома случайным числом из диапазона от 50 до 180 человек. Составьте программу подсчёта количества жителей населённого пункта.

Answer 1

Ответ:

program z_5;

var i, s: integer;

a: array [1..25] of integer;

BEGIN

s:=0;

for i:=1 to 25 do begin

a[i]:= random(50, 180);

s:=s + a[i];

end;

writeln('В 25-ти домах ', s , ' жителей.');

END

Объяснение: