Ксения6 лет назад
var
a, b, c, d, e, f, g, sr: real;
begin
write('Понедельник: ');
read(a);
write('Вторник: ');
read(b);
write('Среда: ');
read(c);
write('Четверг: ');
read(d);
write('Пятница: ');
read(e);
write('Суббота: ');
read(f);
write('Воскресенье: ');
read(g);
sr := (a + b + c + d + e + f + g) / 7;
writeln('Средняя температура за неделю: ', sr:1:2);
end.