Funzione Atn

Funzione trigonometrica che restituisce l'arcotangente di un'espressione numerica. Il valore restituito è compreso tra -Pi/2 e +Pi/2.

L'arcotangente è la funzione inversa alla tangente. La funzione Atn restituisce l'angolo "Alfa", espresso in radianti, usando la tangente di questo angolo. La funzione può restituire anche l'angolo "Alfa" effettuando la comparazione tra il rapporto della lunghezza del lato opposto all'angolo, rispetto alla lunghezza del lato adiacente all'angolo in un triangolo rettangolo.

Atn(lato opposto all'angolo/lato adiacente all'angolo)= Alfa

Sintassi:


        Atn (Numero As Double) As Double
    

Valore restituito:

Double

Parametri:

Number: qualsiasi espressione numerica che rappresenti il rapporto tra i due lati di un triangolo rettangolo. La funzione Atn restituisce l'angolo corrispondente espresso in radianti (arcotangente).

Per convertire i radianti in gradi, moltiplicate i radianti per 180/pi.

grado=(radiante*180)/pi

radiante=(grado*pi)/180

Pi rappresenta la costante fissa del cerchio con il valore arrotondato a 3,14159. Pi è una costante matematica di Basic.

Codici di errore:

5 Richiamo di procedura non valido

Esempio:


        ' L'esempio seguente calcola, per un triangolo retto
        ' l'angolo Alfa dalla tangente dell'angolo Alfa:
        Sub ExampleAtn
        ' Pi arrotondato = 3,14159 è una costante predefinita
        Dim d1 As Double
        Dim d2 As Double
            d1 = InputBox("Inserite la lunghezza del lato adiacente l'angolo: ","Adiacente")
            d2 = InputBox("Inserite la lunghezza del lato opposto all'angolo: ","Opposto")
            Print "L'angolo Alfa è"; (atn (d2/d1) * 180 / Pi); " gradi"
        End Sub
    

Sosteneteci!