Напишите программу которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры Средняя температура за неделю 14.71

Question

Информатика

Лекса

23 июня, 18:06

Напишите программу которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры Средняя температура за неделю 14.71

+1

Ответы (1)

Знаете ответ на вопрос?

Демьян · Answer 1

Программа на Pascal ABC:

var temp, sum, avg, i:integer;

days: array [1 ... 7] of integer;

begin

sum:=0;

for i:=1 to 7 do

begin

readln (days[i]) ;

sum:=sum+days[i];

end;

avg:=sum/7;

writeln ('Средняя температура за неделю = ', avg) ;

end.