Помогите дописать программу , очень нужно.
надо в программе написать чтобы любой человек смог найти средний балл за четверть . Ошибку 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.