Задача. Известны оценки по физике каждого из 20 учеников класса. Определить среднюю оценку. Var S,i, ocenka: integer; Begin S:=0; For i:=1 to 20 do Begin Read ( ocenka ); S:=S+ ocenka; end; Write ( S/20:5:2) end.

Задание

Задача. Известны оценки по физике каждого из 20 учеников класса. Определить среднюю оценку.

Var S,i, ocenka: integer;
Begin
S:=0;
For i:=1 to 20 do
Begin
Read \( ocenka \);
S:=S+ ocenka;
end;
Write \( S/20:5:2\)
end.