IBM Lotus Symphony
|
Trigonometrisk funksjon som returnerer arctangensen til et numerisk uttrykk. Returverdien ligger i området -Pi/2 til +Pi/2.
Arctangens er det motsatte av tangensfunksjonen. Atn-funksjonen returnerer vinkelen "Alpha", uttrykt i radianer, ved å bruke tangens til denne vinkelen. Funksjonen kan også returnere vinkelen "Alpha" ved å sammenligne forholdet mellom lengden på siden som er motsatt av vinkelen, med lengden på den tilstøtende siden til vinkelen i en rettvinklet trekant.
Atn(motstående side til vinkelen/tilstøtende side til vinkelen)= Alpha
Atn (tall)
Dobbel
Tall: Et numerisk uttrykk som representerer forholdet mellom to sider i en rettvinklet trekant. Atn-funksjonen returnerer den tilsvarende vinkelen i radianer (arctangens).
For å konvertere radianer til grader må du multiplisere radianer med 180/pi.
grader=(radian*180)/pi
radian=(grader*pi)/180
Pi er her den faste sirkelkonstanten med avrundet verdi 3,14159.
REM Dette eksempelet beregner for en rettvinklet trekant
REM vinkelen Alpha fra tangens til vinkelen Alpha:
Sub ExampleATN
REM avrundet Pi = 3,14159 er en forhåndsdefinert konstant
Dim d1 As Double
Dim d2 As Double
d1 = InputBox$ ("Enter the length of the side adjacent to the angle: ","Adjacent")
d2 = InputBox$ ("Enter the length of the side opposite the angle: ","Opposite")
Print "The Alpha angle is"; (atn (d2/d1) * 180 / Pi); " degrees"
End Sub