Question

Составьте программу, которая вычисляет среднюю температуру месяца и выводит температуру на экран за каждый день​

Answer 1

var

 temp: array [1..30] of integer;

 sum, flag: integer;

begin

 sum:=0;

 for var i:= 1 to 30 do

 begin

   temp[i]:=random(23);

   sum:=sum+temp[i];

   writeln('День ', i,' - ',temp[i],'°C');

 end;

 writeln('Средняя температура - ',(sum/30), '°C')

end.