график

[AleX_zZ]

надо составить график уравнения fun:=ln(x)-x+1.8 рещенного методом простых итераций

uses graph;
var x,dx:real;
x1,x2:real;
y:real;
mx,my:real;
x0,y0:integer;
px,py:integer;
grdriver:integer;
grmode:integer;
grpath:string;
errcode:integer;
i:integer;
begin
grdriver:=vga;
grmode:=vgahi;
grpatch:'bgi\';
initgraph(grdrver,grmode,grpath);
errcode:=graphresult;
if errcode <> grok then
begin
writeln('ошибка иницилизации графического режима');
writeln('для завершения работы нажмите <enter>');
readln;
halt(l);
end;
setbkcolor(white);
setcolor(green);
x0:=320;y0:=300;mx:=10;my:=1.0;
line(10,y0,630,y0);line(x0,30,x0,47 0);
x1:=0.1;x2:=5,8;dx:==0,0001;x:=x1;
setTextStyle(defaultfont,horizdir,1 );
outtextXY(160,10,'график функции y=lnx-x+1,8');






а как дальше вводить координаты не понимаю, пожалуйста объясните.