Question

"Одномерные массивы" В массивах U[7], D[7], V[7] содержатся значения утренней, дневной и вечерней температуры соответственно за каждый день недели. Подсчитать среднее значение дневной температуры за каждый день. Паскаль

Answer 1

// PascalABC.NET 3.2, сборка 1488 от 21.06.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('Среднедневная температура равна ',
      ReadSeqReal('Введите дневные температуры:',7).Average:0:1)
end.

Пример
Введите дневные температуры: 27.8 29.5 31.7 32.4 27.1 29.2 30.8
Среднедневная температура равна 29.8