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

Код программы:

PROGRAM program7;

VAR

a1,a2,a3,a4,a5,a6,a7: integer;

srednee: real;

BEGIN

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

write('Понедельник');

readln(a1);

write('Вторник');

readln(a2);

write('Среда');

readln(a3);

write...