Question

в пяти тестовых вопросах мальчик получил оценки . Составте программу которая определит средние значение оценок полученных мальчиком

начало такое где
program
var
begin

Answer 1

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.