Tangeskurve

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von faux · begonnen am 15. Feb 2005 · letzter Beitrag vom 15. Feb 2005

Vorheriger Beitrag

Nächster Beitrag

faux

Registriert seit: 18. Apr 2004
Ort: Linz
2.044 Beiträge

Turbo Delphi für Win32

#16

Re: Tangeskurve

15. Feb 2005, 18:12

Hallo!

Ich hab die FOR - Schleife jetzt Schritt für Schritt nachgerechnet (*g*)...
Und bin auch mit meinem TR bei 61 auf eine Polstelle gestoßen...
Und siehe da: Bei X = 61 hängt das Programm....

Wieso ist das so?
Deswegen:
Formel:
tan(X / Image1.Width * 4 * Pi)
Image1.Width ist 488

Rechengang:
tan(X) = sin(X) / cos(x)
cos(61 / 488 * 4 * Pi) = 0

Wieso erkennt das mein Programm nicht, wenn ich schreibe:
if cos(X / Image1.Width * 4 * Pi) <> 0

Faux Manuel
Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß.