Schnittfläche von Kreisen berechnen

Übersicht BlitzMax, BlitzMax NG Allgemein

Neue Antwort erstellen

Ratchet

Betreff: Schnittfläche von Kreisen berechnen

 BeitragDi, Okt 16, 2012 15:56
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich habe zu dem Thema folgende Seite gefunden: http://formularium.org/de/10.html?go=120
Nun habe ich mir aus dem HTML-Code die Formel rausgesucht (Excel-like) und zu BlitzMax konvertiert. Bekomme aber total andere Ergebnisse. Was kann denn da nur falsch laufen Question

BlitzMax: [AUSKLAPPEN] 
Local r1: Float = 5
Local r2: Float = 3
Local d: Float = 2
Local A: Float '28.274333882308138

A = (r2*r2)*ACos(((d*d)+(r2*r2)-(r1*r1))/(2*d*r2))+(r1*r1)*ACos(((d*d)+(r1*r1)-(r2*r2))/(2*d*r1))-0.5*(Sqr((-d+r2+r1)*(d+r2-r1)*(d-r2+r1)*(d+r2+r1)))
Print A

Holzchopf

Meisterpacker

BeitragDi, Okt 16, 2012 19:03
Antworten mit Zitat
Benutzer-Profile anzeigen
BlitzMax: [AUSKLAPPEN] 
Local r1: Float = 2
Local r2: Float = 2
Local d: Float = 1
Local A: Float '28.274333882308138

A = (r2*r2)*ACos(((d*d)+(r2*r2)-(r1*r1))/(2*d*r2))*Pi/180.0..
  +(r1*r1)*ACos(((d*d)+(r1*r1)-(r2*r2))/(2*d*r1))*Pi/180.0..
  -0.5*(Sqr((-d+r2+r1)*(d+r2-r1)*(d-r2+r1)*(d+r2+r1)))
Print A


Oft kannst du davon ausgehen, dass Winkelzeugs in Radiant angegeben/berechnet wird und man Formeln i.d.R. nach Grad umstellen muss.

mfG
Holzchopf
Erledige alles Schritt um Schritt - erledige alles. - Holzchopf
CC BY ♫ BinaryBorn - Yogurt ♫ (31.10.2018)
Im Kopf da knackt's und knistert's sturm - 's ist kein Gedanke, nur ein Wurm

Ratchet

 BeitragMi, Okt 17, 2012 10:23
Antworten mit Zitat
Benutzer-Profile anzeigen
Sei herzlichst bedankt Smile
[iMac 27"] [3,4GHz Intel Core i5 ] [8GB Ram] [NVIDIA GeForce GTX 775M 2GB] [MacOS X Yosemite] [BlitzMax + MaxGui] [Monkey X Pro]

Neue Antwort erstellen


Übersicht BlitzMax, BlitzMax NG Allgemein

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group