Suite de Fibonacci

Table des matières

Description du code

Exemple de récursion en Ocaml

Code source ou contenu du fichier

  1. let rec fib n =
  2.   if n < 2 then 1
  3.   else fib (n - 2) + fib (n - 1)
  4.  
  5. let _ =
  6.   let n =
  7.     try int_of_string Sys.argv.(1)
  8.     with Invalid_argument _ -> 1 in
  9.   Printf.printf "%d\n" (fib n)

Autres extraits de codes en Ocaml

Version en cache

22/12/2024 18:31:58 Cette version de la page est en cache (à la date du 22/12/2024 18:31:58) 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-ocaml/fibonacci-rec.caml.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.