Question

Группа из 25 человек сдало экзамен, определить средний балл. Составить программу на языке Паскаль.

Answer 1

summa := 0;
for counter = 1 To 25 Do
begin
Readln(ball);
summa := summa + a;
end;
writeln(summa/25)


Бегины, энды и косметические изменения сможете, я думаю, ввести сами. Учтите, что summa на 146% будет не целое, то бишь float

Answer 2

Некрасиво! Просили составить программу, а не давать огрызок кода. Не удивлюсь, если модераторы ответ удалят...