Accueil de Gladir.com Notes légales de Gladir.com Flux RSS des nouvelles du site Gladir.com - Langage de programmation - Perl - Mathématique - Factorielle Section du logiciel DOS «MonsterBook» Inventaire de la bibliothèque de Gladir.com Entrée administrateur

Une des fonctions les plus classiques des mathématiques, la Factorielle, est l'une des fonctions les moins intégrés à la base des langages de programmation, le Perl n'en fait pas exception ! Voici un programme permettant de calculer la factorielle de nombre entier en Perl :

  1. #!/usr/bin/perl
  2.  
  3. sub Factoriel() {
  4.  my($n) = @_;
  5.  return $n > 1 ? $n * &Factoriel($n - 1) : 1;
  6. }
  7.  
  8. print "Liste des 16 premiers factoriels entiers:\n";
  9. my($I);
  10. for($I = 0; $I <= 15; $I++) {
  11.     print $I . "! est " . &Factoriel($I) . "\n";
  12. }

on obtiendra le résultat suivant :

Liste des 16 premiers factoriels entiers:
0! est 1
1! est 1
2! est 2
3! est 6
4! est 24
5! est 120
6! est 720
7! est 5040
8! est 40320
9! est 362880
10! est 3628800
11! est 39916800
12! est 479001600
13! est 6227020800
14! est 87178291200
15! est 1.307674368E+012


Voir également

Science - Mathématique

Dernière mise à jour: Mardi, le 3 janvier 2012