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

Question

Информатика

Лекса

6 июня, 17:37

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

+3

Ответы (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.