Составьте программу, которая вычисляет средний балл по информатике в классе. Количество учеников и четвертные отметки каждого из них введите с клавиатуры.
Паскаль. С помощью массива.

vara:array[1..100] of integer;i, n, o, s: integer;begins:=0;read(n); //считывание кол-ва учеников//for i:=1 to n do  beginread(o); s:=s+o;  end;writeln((s/n):17:1);end.