Рисование координатнатной прямой

[CrueLs]

Помогите составить координатную прямую!!! Срочно надо до 29 марта пожалуйста!

[CrueLs]

Помогите плз

[mss]

Надо же так обдолбаться - параболическую кривую беспардонно назвать "координатной прямой")

[CrueLs]

Сообщение от mss

Надо же так обдолбаться - параболическую кривую беспардонно назвать "координатной прямой")

Если знаешь помоги пожалуйста

[phomm]

от балды, но проверил :

procedure TForm1.Button1Click(Sender: TObject);
begin
parabola(-2,2,0.005,50);
end;

procedure TForm1.parabola(startx, finx, delta, measure : single);
begin
while startx <= finx do begin
canvas.Pixels[(clientwidth div 2)+round(startx*measure),
  (clientheight div 2)-round(startx*startx*measure)] := clred;
startx := startx+delta;
end;
end;

минус нужен для отображения в декартовой системе координат, ибо в VCL используется экранная (они различаются противоположно-направленной осью ординат)

Остальное сам делай, что тебе надо, пояснений даже не проси, код фуфлыжный. Ну разве что , у тебя найдётся чем меня убедить тебе помочь

И , кстати, раздел помощь студентам - в другом месте, в следующий раз помни об этом, нето банхаммер, думаю, не пощадит тебя