Известны оценки за контрольную по информатике n учащихся.составте программу,которая вычисляет среднюю оценку(без использования массива).

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

begin
  Writeln('Средняя оценка ',ReadSeqInteger(ReadInteger('n=')).Average:0:1)
end.

Пример
n= 7
5 4 4 3 4 2 3
Средняя оценка 3.6