Hi Leute,

ich hab mir mal folgenden code für den cosinussatz zusammengebastelt, aber nun steck ich fest, wie kann ich mir vom ergebniss das zuletzt in "winkel" steht ( ca. 0,7999) den daraus resultierenden Winkel von 36,88° berechnen
Code:
Dim A As Single
Dim B As Single
Dim C As Single
Dim A2 As Single
Dim B2 As Single
Dim C2 As Single
Dim Winkel As Single

Config Portc.0 = Output

A = 63.25
B = 100
C = 100
Do
B2 = B * B
A2 = A * A
C2 = C * C
Winkel = B2 + C2
Winkel = Winkel - a2
Winkel = Winkel / 2
Winkel = Winkel / B
Winkel = Winkel / C
Winkel = Cos(winkel)

Loop