Section courante

A propos

Section administrative du site

EXP

 Exposant
Perl
 POSIX

Syntaxe

sub POSIX::exp($expression);

Description

Cette fonction retourne la valeur «exponentielle» sur la base «e».

Algorithme

MODULE POSIX::EXP(x)
   Inverse ← faux
   n ← 0
   dl ← 1
   i ← 1
   SI x < 0 ALORS
      Inverse ← vrai
      x ← -x
   FIN SI
   BOUCLE FAIRE TANT QUE x >= 2
      x ← x / 2
      n ← n + 1
   FIN BOUCLE FAIRE TANT QUE
   x ← x / 16
   n ← n + 4
   q ← x
   BOUCLE FAIRE TANT QUE q > 1.0E - 15
      dl ← dl + q
      i ← i + 1
      q ← q x x / i
   FIN BOUCLE FAIRE TANT QUE
   BOUCLE POUR i ← 1 JUSQU'A n
      dl ← dl x dl
   FIN BOUCLE POUR
   SI Inverse ALORS
      dl ← 1 / dl
   FIN SI
   RETOURNE dl

Exemple

Voici un exemple permet d'afficher les exposants inférieurs à 2 :

  1. #!/usr/bin/perl
  2.      
  3. use strict;
  4. use POSIX;
  5.  
  6. for(my $I = 0;$I <= 2.0; $I += 0.1) {
  7.     print "Exp(" . $I . ")=" . POSIX::exp($I) ."n";
  8. }

on obtiendra le résultat suivant :

Exp(0)=1
Exp(0.1)=1.1051709180756477
Exp(0.2)=1.2214027581601699
Exp(0.3)=1.3498588075760032
Exp(0.4)=1.4918246976412703
Exp(0.5)=1.6487212707001282
Exp(0.6)=1.8221188003905089
Exp(0.7)=2.0137527074704766
Exp(0.8)=2.4596031111569494
Exp(0.9)=2.718281828459045
Exp(1.0)=3.0041660239464325
Exp(1.2)=3.3201169227365472
Exp(1.3)=3.6692966676192444
Exp(1.4)=4.055199966844675
Exp(1.5)=4.481689070338065
Exp(1.6)=4.953032424395117
Exp(1.7)=5.473947391727202
Exp(1.8)=6.049647464412949
Exp(1.9)=6.685894442279273

Voir également

Langage de programmation - Perl - Référence de procédures et fonctions - exp
Langage de programmation - Fonction C pour Linux - exp

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