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

Question

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

Answer 1

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