Halbkreise dynamisch zeichnen

[Khabarakh]

Delphi-Quellcode:

for x := - r + M.x to r + M.x do
begin
  y := M.y + Sqrt(Sqr(r) - Sqr(x)); // Halbkreis nach unten
  [...]
end;

Bei größeren Kreisen würde ich aber zu einer Kreisformel in Parameterdarstellung greifen, dann ist der Kreis regelmäßiger.