IBM Lotus Symphony


Fonction Atn [Exécution]

Fonction trigonométrique renvoyant l'arc tangente d'une expression numérique. La valeur de retour est comprise entre -Pi/2 et +Pi/2.

Son action est l'inverse de celle de la fonction tangente. La fonction Atn calcule l'angle "Alpha", en radians, à partir de la tangente de cet angle. Elle peut aussi le calculer en établissant le rapport entre la longueur du côté opposé à l'angle et la longueur du côté adjacent à celui-ci, dans un triangle rectangle.

Atn(côté opposé à l'angle/côté adjacent à l'angle)= Alpha

Syntaxe :

Atn (Number)

Valeur de retour :

Double

Paramètres :

Number : expression numérique représentant le rapport entre deux côtés d'un triangle rectangle. La fonction Atn renvoie l'angle correspondant en radians (arc tangente).

Pour convertir des radians en degrés, multipliez les radians par 180/pi.

degrés=(radians*180)/pi

radians=(degrés*pi)/180

Codes d'erreur

Codes d'erreur

5 Appel de procédure incorrect

Exemple :

REM L'exemple suivant renvoie, pour un triangle rectangle,

REM L'angle alpha calculé à partir de la tangente de cet angle :

Sub ExampleATN

REM Pi arrondi = 3,14159 est une constante prédéfinie.

Dim d1 As Double

Dim d2 As Double

d1 = InputBox$ ("Saisissez la longueur du côté adjacent à l'angle : ","Adjacent")

d2 = InputBox$ ("Saisissez la longueur du côté opposé à l'angle : ","Opposé")

Print "L'angle alpha est"; (atn (d2/d1) * 180 / Pi); " degrés"

End Sub


Commentaires en retour sur le produit | Documentation complémentaire | Marques