Suite de Fibonacci

Description du code

Exemple d'itération en Eiffel

Code source ou contenu du fichier

  1. fibiter (k: INTEGER): INTEGER is
  2. -- Fibonacci
  3. require
  4. pre_fib: k > 0
  5. local
  6. j, p, c, n: INTEGER
  7. do from
  8. p := 0;
  9. c := 1;
  10. j := 1
  11. until
  12. j = k
  13. loop
  14. n := p + c;
  15. p := c;
  16. c := n;
  17. j := j + 1
  18. end;
  19. Result := c
  20. end;
  21. -- fib1

Autres extraits de codes en eiffel

Version en cache

22/12/2024 16:09:59 Cette version de la page est en cache (à la date du 22/12/2024 16:09:59) afin d'accélérer le traitement. Vous pouvez activer le mode utilisateur dans le menu en haut pour afficher la dernère version de la page.

Document créé le 05/10/2009, dernière modification le 28/10/2018
Source du document imprimé : https://www.gaudry.be/sniplet-rf-eiffel/fibonacci-iter.e.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.