Метод Хорд, метод Ньютона, графический вариант и численный. Опции

[Poison]

Вычислить корни уравнения графически и уточнить один из них методом Хорд с точностью до 0,001
ctg(1,05x)-(x*x)=0 [(x*x)-квадрат]
Совершенно не представляю, как это делается.
Есть еще две задачи на метод Ньютона и усовершенствованный метод Эйлера, но я даже не знаю, их просто решить или тоже программами.

[Altair]

Код

uses graph;
const
x0=500; {Є®®а¤Ё­ вл ­ з «  Є®®а¤Ё­ в}
y0=400;
var
gm,gd:integer;
x1,y1,i:integer;
x,y:real;
begin
{ gd:=detect;
initgraph(gd,gm,'');}
gd:=InstallUserDriver('vesa256',nil);
gm:=3;
initgraph(gd,gm,'');
{------------------}
setcolor(15);
{®бЁ Є®®а¤Ё­ в}
for i:=0 to 768 do putpixel(x0,i,8);
for i:=0 to 1024 do putpixel(i,y0,8);
{ ббЁ¬Їв®вл: sin(1.05x)=0 => x=Џn}
x:=-9.01; {m}
while x<9 do
begin
 If x<>0 then y:=cos(1.05*x)/sin(1.05*x)-x*x;
 if (y>-2147483640) and (y<2147483640) then
 begin
  y1:=trunc(y*10);  {m - masshtab po OY}
  x1:=trunc(x*100)-100; {m}
  putpixel(x0+x1,y0-y1,7)
 end;
 x:=x+0.01;           {m}
end;

readln;
closegraph
end.

это графическое решение.
На экране видно, что пересечений много.
P.S.
E-MAIL напиши, чтобы я отпрaвил VESA драйвер.
P.S. Красивее графика чем этот я пожалуй еще не видел