ArcTan |
Arc Tangente |
|---|---|
| HighSpeed Pascal | System |
Syntaxe
| Function ArcTan(N):Real; |
Paramètres
| Nom | Description |
|---|---|
| N | Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter. Le paramètre N est une expression de type entier ou réel. Le résultat est la valeur principale, en radians, de l'arc tangente de N. |
Description
Cette fonction trigonométrique permet de calculer l'arc tangente en radians.
Remarque
- Le paramètre N est une expression de type entier ou de type réel. Le résultat est la valeur principale, en radians, du paramètre N.
Algorithme
|
MODULE SQRT(X) SI X = 0.0 ALORS RETOURNE 0.0 SINON M ← 1.0 XN ← X BOUCLE FAIRE TANT QUE XN >= 2.0 XN ← 0.25 x XN M ← 2.0 x M FIN BOUCLE FAIRE TANT QUE BOUCLE FAIRE TANT QUE XN < 0.5 XN ← 4.0 x XN M ← 0.5 x M FIN BOUCLE FAIRE TANT QUE A ← XN B ← 1.0 - XN BOUCLE REPETER A ← A x (1.0 + 0.5 x B) B ← 0.25 x (3.0 + B) x B x B FIN BOUCLE JUSQU'A B ← 1.0E - 15 RETOURNE A x M FIN SI MODULE ARCTAN(X) A ← 1.0 / SQRT(1.0 + (X x X)) B ← 1.0 BOUCLE POUR N ← 1 JUSQU'A 11 A ← (A + B) / 2.0 B ← SQRT(A x B) FIN BOUCLE POUR RETOURNE X / (SQRT(1.0 + (X x X)) x A) |
Exemple
L'exemple suivant permet de mettre dans une variable le résultat de l'arc tangente de 123 :
- Program ArcTanSamples;
- Var
- Res:Real;
- Begin
- Res:=ArcTan(123);
- End.
Dernière mise à jour : Lundi, le 20 avril 2020