Вот программа program suma; var a,q,w,e,r,t,y,u:real; begin writeln('Введите температуру воздуха понедельник'); readln(q); writeln('Введите температуру воздуха вторник'); readln(w); writeln('Введите чесло температуру воздуха среду'); readln(e); writeln('Введите чесло температуру воздуха четверг'); readln(r); writeln('Введите чесло температуру воздуха пятницу'); readln(t); writeln('Введите чесло температуру воздуха субботу'); readln(y); writeln('Введите чесло температуру воздуха воскресенье'); readln(u); a:=((q+w+e+r+t+y+u)/(7)); writeln(a); end. Тут всё понятно
Начинается с*** ну и воть