Известны оценки за контрольную по информатике n учащихся.составте - вопрос №8160561 от ts26092004 04.04.2022 11:37

Question

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

ts26092004 · Answer

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