Задание:
В пяти тестовых вопросах мальчик получил оценки. Составте программу которая определит средние значение оценок полученных мальчиком начало такое где program var begin
Решение:
Var n,n1,n2,n3,n4: real; Begin Write ('Введите оценки: '); readln (n,n1,n2,n3,n4); n: =(n+n1+n2+n3+n4) /5; Writeln ('Средний балл: ',n); End.
Знаете другой ответ?