Einzelnen Beitrag anzeigen

Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#2

AW: Kreis schneidet Gerade

  Alt 30. Jan 2011, 15:17
Code:
k: {r=10, @P[0,0]}   
= (x-pX)^2+(y-pY)^2=r^2
= x^2 + y^2 = 100
= y = (100-x^2)^0.5

g: {winkel 90-w, g(0)=0}
= neuerWinkel n = 90-w;
= g(x) = kx + d
= d = 0, da durch [0,0] geht
= k = sin(n)
= g(x) = y = sin(n)*x

g schneidet k:
= k = g
= (100-x^2)^0.5 = sin(n)*x
Nach x auflösen
Du solltest zwei x Werte erhalten, da die gerade durch [0,0] durchgeht und der Kreis kozentrisch zu diesem Punkt ist

Anschließend setzt du die beiden Werte in eine der beiden Funktionen ein und ermittelst die dazugehörigen y-Werte
Sofern ich mich oben nicht vertan habe, dürftest du mit dem Bild im Anhang weiterkommen
Edit: Ups hab mich vertan, aber jetzt ausgebessert...
Miniaturansicht angehängter Grafiken
derive.png  
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG

Geändert von Aphton (30. Jan 2011 um 15:33 Uhr)
  Mit Zitat antworten Zitat