Suite de Fibonacci

Description du code

Exemple d'itération en Perl avec bigint

Code source ou contenu du fichier

  1. #! /usr/bin/perl
  2. use bigint;
  3.  
  4. my ($a, $b) = (0, 1);
  5. for (;;)
  6. {
  7. print "$a\n";
  8. ($a, $b) = ($b, $a+$b);
  9. }

Autres extraits de codes en Perl

Document créé le 05/10/2009, dernière modification le 28/10/2018
Source du document imprimé : https://www.gaudry.be/sniplet-rf-perl/fibonacci-iter-bigint.pl.html

L'infobrol est un site personnel dont le contenu n'engage que moi. Le texte est mis à disposition sous licence CreativeCommons(BY-NC-SA). Plus d'info sur les conditions d'utilisation et sur l'auteur.