brauche dringend ein programm das funktionen zeichnet

[Luckie]

Das gibt schon mal eine Parabel:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Loop         : Integer;
begin
  Paintbox1.Canvas.MoveTo(0, 0);
  for Loop := 0 to 10000 do
  begin
    Paintbox1.Canvas.LineTo((Loop * Loop) div 100 , Loop);
  end;
end;

Prinzip ist das: Du hast eine Funktionsgleichung der Art: f(x) = ax³+bx²+cx+d. Wenn du die jetzt Zeichen willst, musst du dir für jeden Punkt auf der y-Achse, f(x), den Funktionswert ausrechnen und dann den Punkt zeichnen.