Напишите программу, которая вычисляет среднюю за неделю температуру воздуха. исходные данные вводятся с клавиатуры. пример выходных данных: введите температуру понедельник> > 12 вторник> > 10 среда> > 16 четверг> > 18 пятница> > 17 суббота> > 16 воскресенье> > 14 пример выходных данных: средняя температура за неделю: 14.71
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 - середня температура