Паскаль. От чего зависит кол-во итераций? Срочно!!!

[Ambioz]

Помогите, пожалуйста, срочно!!!. От чего зависит кол-во итераций в примерах

f1(X)=sin x-cos x-0.5

Ввод исходных данных

write ('Задайте точность расчета: ');

readln (EPS);

write ('Задайте границы интервала: ');

readln (x1,x2);

n:=0; //N: INTEGER – количе-ство итераций

x3:=(x1+x2)/2;

while abs(f(x3)) > EPS do

begin

y1:=f(x1);

y2:=f(x2);

x3:=x1-y1*(x2-x1)/(y2-y1);

y3:=f(x3);

if ((y1>0)AND(y3>0)) OR ((y1<0)and(y3<0)) then

x1:=x3

else

x2:=x3;

n:=n+1

end;

x:=x3;

f2(x)=SQR(x-2)*2x-1

Ввод исходных данных

write ('Задайте точность расчета: ');

readln (EPS);

write ('Задайте начальное приближение: ');

readln (x1);

Расчет

n:=0; //N: INTEGER – количе-ство итераций

x2:=x1+10;

while abs(x2-x1)>EPS do

begin

x2:=x1;

x1:=x1-f(x1)/f1(x1);

n:=n+1

end;

x1:=(x1+x2)/2.0;

Вывод результата 

WRITELN ('Корень уравнения ',x1);

WRITELN ('Количество итераций ',n);

Функция f 

FUNCTION f(x: real): real;

begin

f:=sqr(x-2)*exp(x*ln(2))-1;

end;

Функция f 1

FUNCTION f1(x: real): real;

begin

f1:=2*(x-2)*exp(x*ln(2))+(x-2)*exp(x*ln(2))*ln(2);

end;

Как это выразить словами?

[maxx1101]

вот это вопросы - наверное от точности вычислений?

давно я этим делом не занимался :-)

[Ambioz]

Спасибо, уже нашел.

Число итераций зависит от границ интервала.

В обоих методах при увеличении точности линейно увеличивается количество итераций.

[maxx1101]

ты что прямо с пар вопросы задаешь?

[Ambioz]

Нет, но сегодня надо ответ дать. А ответ бал написан в курсовике, который я сдаю.

Просто надо читать иногда то, что сдаёшь.

[Гость bot]

Топик был перенесен из форума Взаимопомощь в форум Форум программистов

Mac