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

    Пример выходных данных:
    Средняя температура за неделю: 14.71

Ответы 2

  • Согласен...
  • За 5 баллов в следующий раз никто программу не напишет вамvar mo,tu,we,th,fr,sa,su,a: ShortInt;var b: Real;BeginWrite('Температура воздуха в Понедельник: ');Readln(mo);Write('Температура воздуха во Вторник: ');Readln(tu);Write('Температура воздуха в Среду: ');Read(we);Write('Температура воздуха в Четверг: ');Readln(th);Write('Температура воздуха в Пятницу: ');Readln(fr);Write('Температура воздуха в Субботу: ');Readln(sa);Write('Температура воздуха в Воскресенье: ');Readln(su);a:=mo+tu+we+th+fr+sa+su;b:=a/7;Write('Средняя температура воздуха: ',b:0:2,' градусов.');End.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years