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

[Poison]

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

[Altair]

Вот, что я уже сделал, - потроение графика

Код

uses graph;
const
x0=500; {Є®®а¤Ё­ вл ­ з «  Є®®а¤Ё­ в}
y0=200;
var
gm,gd:integer;
x,y1,i:integer;
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);
For x:=-200 to 200 do
begin
 {ctg=cos/sin}
 If x<>0 then
 begin
  y:=cos(1.05*x)/sin(1.05*x)-x*x;
  y1:=trunc(y);
  PutPixel(x0+x,y0-y1,9)
 end
end;


readln;
closegraph
end.

Везу можно скачать отсуда:

http://pascal.dax.ru/forum/index.php?showtopic=1871