Section courante

A propos

Section administrative du site

TAN

Tangente
Perl
POSIX

Syntaxe

sub POSIX::tan($expression);

Paramètres

Nom Description
$expression Ce paramètre permet d'indiquer l'expression ou la valeur à convertir.

Description

Cette fonction trigonométrique retourne la «tangente».

Algorithme

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

MODULE SIN(X)
   RX 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 POSIX::TAN(X)
   RETOURNE SIN(X)/COS(X)

Exemple

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

  1. #!/usr/bin/perl
  2.      
  3. use strict;
  4. use Math::Trig;
  5. use POSIX;
  6.  
  7. my $I = 0;
  8. while($I < pi) {
  9.     print "TAN(" . $I . ")=" . POSIX::tan($I) . "n";
  10.     $I += 0.1;
  11. }

on obtiendra le résultat suivant :

TAN(0)=0
TAN(0.1)=0.10033467208545055
TAN(0.2)=0.2027100355086725
TAN(0.3)=0.3093362496096233
TAN(0.4)=0.4227932187381618
TAN(0.5)=0.5463024898437905
TAN(0.6)=0.6841368083416923
TAN(0.7)=0.8422883804630794
TAN(0.8)=1.029638557050364
TAN(0.9)=1.260158217550339
TAN(1.0)=1.5574077246549018
TAN(1.1)=1.9647596572486512
TAN(1.2)=2.5721516221263188
TAN(1.3)=3.6021024479679786
TAN(1.4)=5.797883715482894
TAN(1.5)=14.101419947171763
TAN(1.6)=-34.23253273555705
TAN(1.7)=-7.696602139459134
TAN(1.8)=-4.286261674628054
TAN(1.9)=-2.9270975146777674
TAN(2.0)=-2.1850398632615162
TAN(2.1)=-1.7098465429045056
TAN(2.2)=-1.3738230567687935
TAN(2.3)=-1.1192136417341305
TAN(2.4)=-0.916014289673409
TAN(2.5)=-0.7470222972386589
TAN(2.6)=-0.6015966130897574
TAN(2.7)=-0.47272762910303623
TAN(2.8)=-0.3555298316511746
TAN(2.9)=-0.24640539397196493
TAN(3.0)=-0.14254654307427644
TAN(3.1)=-0.041616654585634565

Voir également

Langage de programmation - Fonction C pour Linux - tan

Dernière mise à jour : Dimanche, le 18 octobre 2015