Встречено := а ожидался оператор , в 10 строкеVar a,b,h,e: real;I,k: integer;f,x: array [1. . 6] of real;Function f1 (t :real) : real;Begin f1 :=7230. 122-925. 124*t+0. 96*t*t end;BeginReal(a,b,k,e);h:=(b-a)/k;For i:= 1 to k+1 do beginx[i]:=a+(i-1)*h:f[i]:=f1(x[i]) End;For f[i]:=f[i];x[1];x[i] end;a:=x[1]–h; b:=x[1]+h;Writeln (‘A=‘, a,‘B=‘, b);Until abs (b-a)x[1]:=(a+b)/2;f[1]:=f1(x[1]);Writeln(‘X=‘, x[1], ‘F=‘, f[1])End.