Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Kreis schneidet Gerade (https://www.delphipraxis.net/157935-kreis-schneidet-gerade.html)

rob60 30. Jan 2011 14:55

Kreis schneidet Gerade
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hi
hab nen kleines Problem:

Ich hab nen Kreis(k) mit radius(r=10) um den Punkt(p=0,0),
eine Gerade(g y=0) und eine Gerade(g1) die die Gerade g schneidet ,im Winkel(w) .


So zur eigentlichen Frage wo liegen die zwei Punkte wo sich die Gerade g1 und der kreis schneiden

Ich weiss ist ein bisschen kompliziert erklärt noch eine Skizze im Anhang.


Ps das sind keine Hausaufgaben das soll eine scan auswert software
für meinen mini roboter gebeben

Aphton 30. Jan 2011 15:17

AW: Kreis schneidet Gerade
 
Liste der Anhänge anzeigen (Anzahl: 1)
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...

rob60 30. Jan 2011 18:16

AW: Kreis schneidet Gerade
 
Danke hab grad was einfacheres gefunden

sin(w)*r=x
cos(w)*r=y

ok liefer nur einen reicht bei mir aber


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:10 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz