• В компьютер вводится значения средней дневной температуры за неделю.На экран необходимо вывести среднюю температуру за неделю,и,если был хоть один день с отрицательной температурой,вывести статус "Были заморозки" (необходимые значения вводится с клавиатуры). Нужно составить программу в Паскале и нарисовать алгоритм.

Ответы 2

  • Решение в прикрепленном файле
    answer img
    • Автор:

      luna66
    • 6 лет назад
    • 0
  • var i,k:integer; s:real;    a:array[1..7] of real;beginclrscr;k:=0; s:=0;writeln('Введите среднюю дневную температуру с понедельника по воскресенье:');for i:=1 to 7 do begin  Write(i,'-я:');  readln(a[i]);  if a[i]<0 then k:=1;  s:=s+a[i]; end; Writeln('Средняя температура за неделю составила  ',s/7, ' градусов'); if k=1 then writeln('Были заморозки');end.
    answer img
    • Автор:

      mimi46
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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