Forum: Object-Pascal / Delphi-Language
Delphi
by Sidorion,
15. Mär 2007
Ja ist mir gerade auch aufgefallen.. ich vergesse immer, dass es die funktion sqr fürs quadrieren gibt. :oops:
Forum: Object-Pascal / Delphi-Language
Delphi
by Sidorion,
15. Mär 2007
Ich will nicht den Finger haben, aber a^2+b^2=c^2 => sqr(a^2+b^2)=c, nicht sqr(c)!
edit: und schon garnicht sqr(a)+srr(b)=sqr(c), besuche bitte nochal die 9. Klasse!
Du kannst aber in jeder Schleife die Wurzel sparen, da gilt a^2>(<,=)b^2 <=> a>(<,=)b | a,b e R0+, sprich:
if Power(x - center.x, 2) + Power(y - center.y, 2) <= Power(r,2)
Hier kannst Du aber r^2 vor dem Schleifendurchlauf...