Section courante

A propos

Section administrative du site

TAN

 Tangente
Delphi/Kylix/Lazarus Math

Syntaxe

Function Tan(X:Extended):Extended;

Paramètres

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

Description

Cette fonction trigonométrique retourne la «Tangente».

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. Program TanSamples;
  2.  
  3. {$APPTYPE CONSOLE}
  4.  
  5. Uses SysUtils,Math;
  6.  
  7. Var
  8.  I:Double;
  9.  
  10. BEGIN
  11.  I := 0;
  12.  While I < PI do Begin
  13.   WriteLn('TAN(',I:0:1,')=',Tan(I):0:12);
  14.   I := I + 0.1;
  15.  End;
  16. END.

on obtiendra le résultat suivant :

TAN(0.0)=0.000000000000
TAN(0.1)=0.100334672085
TAN(0.2)=0.202710035509
TAN(0.3)=0.309336249610
TAN(0.4)=0.422793218738
TAN(0.5)=0.546302489844
TAN(0.6)=0.684136808342
TAN(0.7)=0.842288380463
TAN(0.8)=1.029638557050
TAN(0.9)=1.260158217550
TAN(1.0)=1.557407724655
TAN(1.1)=1.964759657249
TAN(1.2)=2.572151622126
TAN(1.3)=3.602102447968
TAN(1.4)=5.797883715483
TAN(1.5)=14.101419947172
TAN(1.6)=-34.232532735557
TAN(1.7)=-7.696602139459
TAN(1.8)=-4.286261674628
TAN(1.9)=-2.927097514678
TAN(2.0)=-2.185039863262
TAN(2.1)=-1.709846542905
TAN(2.2)=-1.373823056769
TAN(2.3)=-1.119213641734
TAN(2.4)=-0.916014289673
TAN(2.5)=-0.747022297239
TAN(2.6)=-0.601596613090
TAN(2.7)=-0.472727629103
TAN(2.8)=-0.355529831651
TAN(2.9)=-0.246405393972
TAN(3.0)=-0.142546543074
TAN(3.1)=-0.041616654586

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - ArcCos
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - ArcSin
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - ArcTan
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Cos
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Sin

Dernière mise à jour : Mercredi, le 18 février 2015