LibreOffice 25.8 Hjælp
Trigonometrisk funktion som returnerer arcus tangens på et numerisk udtryk. Returværdien er i området -PI/2 til +PI/2.
Arcus-tangensen er tangens-funktionens inversion. Funktionen Atn returnerer vinklen "Alfa", udtrykt i radianer med denne vinkels tangens. Funktionen kan også returnere vinklen "Alfa" ved at sammenligne forholdet mellem længden af vinklens modstående side og længden af dens hosstående side med vinklen i en retvinklet trekant.
Atn(vinklens modstående side/vinklens hosstående side)= Alpha
        Atn (Tal As Double) As Double
    Double
Tal: Ethvert numerisk udtryk, der repræsenterer forholdet mellem to sider i en retvinklet trekant. Funktionen Atn returnerer den tilsvarende vinkel i radianer (arcustangens).
For at konvertere radianer til grader, gang radianer med 180/pi.
grad=(radian*180)/pi
radian=(grad*pi)/180
Pi er her den faste cirkelkontant med den afrundede værdi 3,14159. Pi er en Grundliggende matematisk konstant.
        ' Følgende eksempel beregner for en retvinklet trekant
        ' vinklen Alfa fra tangenten på vinklen Alfa:
        Sub ExampleAtn
        ' afrundet Pi = 3,14159 er en foruddefineret konstant
        Dim d1 As Double
        Dim d2 As Double
            d1 = InputBox("Angiv længden på siden, der støder op til vinklen: ", "Tilstødende")
            d2 = InputBox("Angiv længden af den modstående side: ", "Modstående")
            Print "Alfavinklen er"; (atn (d2/d1) * 180 / Pi); " grader"
        End Sub