Группа из 25 человек сдало экзамен, определить средний балл. Составить программу на языке Паскаль.
Summa := 0; for counter = 1 To 25 Do begin Readln(ball); summa := summa + a; end; writeln(summa/25) Бегины, энды и косметические изменения сможете, я думаю, ввести сами. Учтите, что summa на 146% будет не целое, то бишь float
Некрасиво! Просили составить программу, а не давать огрызок кода. Не удивлюсь, если модераторы ответ удалят...