Встречено := а ожидался оператор , в 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;
Begin
Real(a,b,k,e);
h:=(b-a)/k;
For i:= 1 to k+1 do begin
x[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.

Есть вопросы?

• Как otvet5GPT работает?
  otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

• Сколько это стоит?
  Проект находиться на стадии тестирования и все услуги бесплатны.

• Могу ли я использовать otvet5GPT в школе?
  Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

• В чем отличия от ChatGPT?
  otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.