ЗАДАЧА В ПАСКАЛЕ МОЛЮ ЧТО ПИСАТЬ НАДО АА ПОМОГИТЕ
Создать программу для определения средней отметки группы учащихся n человек. Каждый ученик получил k отметок.
Пожалуйста!

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)var a,n,k,i,j,s:integer;begin  writeln('Количество учеников и количество оценок');  readln(n,k);  for i:=1 to n do begin    for j:=1 to k do begin      write('Ученик № ',i, ' оценка № ',j,' = ');      readln(a);      s:=s+a;    end;  end;  println('Средняя оценка группы ',s/(n*k):6:3); end.Тестовое решение:Количество учеников и количество оценок3 3Ученик № 1 оценка № 1 = 3Ученик № 1 оценка № 2 = 4Ученик № 1 оценка № 3 = 4Ученик № 2 оценка № 1 = 5Ученик № 2 оценка № 2 = 4Ученик № 2 оценка № 3 = 4Ученик № 3 оценка № 1 = 4Ученик № 3 оценка № 2 = 3Ученик № 3 оценка № 3 = 3Средняя оценка группы  3.778