Hilfe für LibreOffice 26.2
Bestimmt den Tangens eines Winkels. Der Winkel wird im Bogenmaß angegeben.
Unter Verwendung des Winkels Alpha berechnet die Funktion Tan das Verhältnis der Länge der dem Winkel gegenüberliegenden Seite zur Länge der dem Winkel benachbarten Seite in einem rechtwinkligen Dreieck.
Tan(Alpha) = Seite gegenüber dem Winkel/Seite neben dem Winkel
Tan (Zahl As Double) As Double
Double
Zahl: Ein beliebiger numerischer Ausdruck, dessen Tangens (im Bogenmaß) berechnet werden soll.
Um Grad in Bogenmaß umzuwandeln, mit Pi/180 multiplizieren. Um Bogenmaß in Grad umzuwandeln, mit 180/Pi multiplizieren.
Grad=(Bogenmaß*180)/Pi
Bogenmaß=(Grad*Pi)/180
Pi ist ungefähr 3,141593.
' Das folgende Beispielprogramm erlaubt für ein rechtwinkliges Dreieck die Eingabe von:
' Gegenkathete und Winkel (in Grad) und berechnet daraus die Länge der Ankathete:
Sub ExampleTangens
' Pi = 3.1415926 ist eine vordefinierte Variable
Dim d1 As Double
Dim dAlpha As Double
d1 = InputBox("Bitte die Länge der Gegenkathete eingeben: ","Gegenkathete")
dAlpha = InputBox("Bitte den Winkel Alpha eingeben (in Grad): ","Alpha")
Print "Die Länge der Ankathete beträgt"; (d1 / tan (dAlpha * Pi / 180))
End Sub