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

Question

Напишите программу, которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры.
Пример выходных данных:
Введите температуру
Понедельник>> 12
Вторник>> 10
Среда>> 16
Четверг>> 18
Пятница>> 17
Суббота>> 16
Воскресенье>> 14

Пример выходных данных:
Средняя температура за неделю: 14.71

Comments

язык?

---

Паскаль

Answer 1

Program Pascal;
var t1,t2,t3,t4,t5,t6,t7,t : real;
begin
write ('Vvestu t1,t2,t3,t4,t5,t6,t7');
read (t1,t2,t3,t4,t5,t6,t7);
t:= (t1+t2+t3+t4+t5+t6+t7)/2;
writeln ('t=', t:2:1);
end.
*t - середня температура