Funktionsgraph zeichnen

[malo]

Delphi-Quellcode:

for x := 0 to 100 do
begin
  Bitmap1.Canvas.LineTo(Bitmap1.Width-x, Bitmap1.Top - (1 div (4*d) * (Ua div Ub)*x*x));
end;

Also: Die halbe Koordinate musst du einfach plump erraten und die andere mit der Formel ausrechnen.