"одномерные массивы" в массивах u[7], d[7], v[7] содержатся значения утренней, дневной и вечерней температуры соответственно за каждый день недели. подсчитать среднее значение дневной температуры за каждый день. паскаль

// 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