On va maintenant étudier la remarquable suite de Syracuse.
Pour commencer, il faut définir la fonction de Syracuse. Cette fonction, nommée syracuse
, prend en paramètre un entier nommé p
. Si p
est pair, elle renvoie p / 2
(la moitié de p). Si p
est impair, elle renvoie 3 * p + 1
.
Code à compléter Caml
let read_int() = Scanf.scanf " %d" (fun x -> x);; let syracuse p = (*à compléter*) in print_int (syracuse (read_int()));;