Страница 72-86 §2.2 номер 7, ГДЗ по информатике за 9 класс к учебнику Босовой

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

program z_7;

const

n = 7;

b: array [1..n] of string = ('Понедельник', 'Вторник', 'Среда', 'Четверг', 'Пятница', 'Суббота', 'Воскресенье');

var

i, t, s: integer;

a: integer;

begin

s := 0;

writeln('Введите температуру');

for i := 1 to n do

begin

write(b[i], '>>');

readln(a); s := s + a

end;

writeln('Средняя температура за неделю:', s /n:4:2)

end.