Помогите дописать программу , очень нужно. надо в программе написать чтобы любой человек смог найти средний балл за четверть . Ошибку from не знаю как решить . ( Сама программа , должна быть написана на среднее арифметическое число )
program Sokol_233;
var a, b, n:integer;
begin
readln(n);
for i from 1 to n do (Program1.pas(5) : Встречено 'from', а ожидалось ':')
c:=0;
readln(a,b,c);
c:=(a+b)/2;
writeln(c:10:2);
readln
end.