# conjecture_de_syracuse

# Programme conjecture_de_syracuse-src
(Declarer x De_type "nombre")

(Afficher "Veuillez entrer un nombre")
(Affecter_a x (Nombre (Demander)))

(Afficher x)
(Tant_que (> x 1)
Faire
(Si (= (% x 2) 0)
Alors
   (Affecter_a x (/ x 2))
Sinon
   (Affecter_a x (+ (* x 3) 1))
)
   (Afficher x)
   
)