Спасибо, уже додумалась

)
Осталось вывести над графиком пару строк, и оси сделать

И еще вопрос...
спросила двух знакомых, один говорит отсчет координат справа сверху, другой слева...
Добавлено через 7 мин. Такс, извените

еще пару вопросов по программе.
Где в коде находиться значиние в таблице, и строиться сама таблица
while X < 20 do begin
Y := f(X);
if n mod 10 = 0 then begin
color := lightred;
outtextxy(TableWidth div 2, ((n div 10) + 2) * (textheight('W') + 3),
RealToStr(X) + ' ' + RealToStr(Y));
end
else color := white;
putpixel(CenterX + trunc(X * ScaleX),
CenterY - trunc(Y * ScaleY), color);
X := X + 0.2;
inc(n)
end;
я правильно поняла?
А где рисуется сам график, и оси координат?
Процедуру для ошибки тоже уже выучила

))
Добавлено через 18 мин. Такс, и еще вопрос, так, как модуль сrt не подключен, как можно сделать, допустим что бы значение X нужно было вводить с клавиатуры?
(я про y=lg(x)) Для себя просто интересно