Section courante

A propos

Section administrative du site

TAN

 Tangente
PL/1

Syntaxe

Y=TAN(X);

Paramètres

Nom Description
X Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter

Description

Cette fonction trigonométrique permet de connaitre la «Tangente» en radians.

Algorithme

MODULE COS(X)
   R ← X x X
   S ← 42.0
   BOUCLE POUR I ← 10 JUSQU'A 1
      S ← 4.0 x I - 2.0 + (-R) / S
   FIN BOUCLE POUR
   S ← S x S
   RETOURNE (S - R) / (S + R)

MODULE SIN(X)
   R ← X x X
   S ← 42.0
   BOUCLE POUR I ← 10 JUSQU'A 1
      S ← 4.0 x I - 2.0 + (-R) / S
   FIN BOUCLE POUR
   RETOURNE 2.0 x X x S / (R + S x S)

MODULE TAN(X)
   RETOURNE SIN(X)/COS(X)

Exemple

Voici un exemple permet d'afficher les tangentes inférieurs à π :

  1.  Corps: PROC options(main);
  2.       DECLARE (PI,I) float;
  3.       I = 0;
  4.       PI = 3.14159;
  5.       DO WHILE (I < PI);
  6.         display('TAN(' || I || ')=' || tan(I));
  7.         I += 0.1;
  8.       END;
  9.  END Corps;

on obtiendra le résultat suivant :

TAN( 0.00000E+0000)= 0.00000E+0000
TAN( 1.00000E-0001)= 1.00335E-0001
TAN( 2.00000E-0001)= 2.02710E-0001
TAN( 3.00000E-0001)= 3.09336E-0001
TAN( 4.00000E-0001)= 4.22793E-0001
TAN( 5.00000E-0001)= 5.46302E-0001
TAN( 6.00000E-0001)= 6.84137E-0001
TAN( 7.00000E-0001)= 8.42288E-0001
TAN( 8.00000E-0001)= 1.02964E+0000
TAN( 9.00000E-0001)= 1.26016E+0000
TAN( 1.00000E+0000)= 1.55741E+0000
TAN( 1.10000E+0000)= 1.96476E+0000
TAN( 1.20000E+0000)= 2.57215E+0000
TAN( 1.30000E+0000)= 3.60211E+0000
TAN( 1.40000E+0000)= 5.79789E+0000
TAN( 1.50000E+0000)= 1.41015E+0001
TAN( 1.60000E+0000)=-3.42322E+0001
TAN( 1.70000E+0000)=-7.69658E+0000
TAN( 1.80000E+0000)=-4.28626E+0000
TAN( 1.90000E+0000)=-2.92709E+0000
TAN( 2.00000E+0000)=-2.18504E+0000
TAN( 2.10000E+0000)=-1.70985E+0000
TAN( 2.20000E+0000)=-1.37382E+0000
TAN( 2.30000E+0000)=-1.11921E+0000
TAN( 2.40000E+0000)=-9.16015E-0001
TAN( 2.50000E+0000)=-7.47023E-0001
TAN( 2.60000E+0000)=-6.01597E-0001
TAN( 2.70000E+0000)=-4.72728E-0001
TAN( 2.80000E+0000)=-3.55530E-0001
TAN( 2.90000E+0000)=-2.46406E-0001
TAN( 3.00000E+0000)=-1.42547E-0001
TAN( 3.10000E+0000)=-4.16175E-0002

Dernière mise à jour : Samedi, le 18 octobre 2014