From 7bda8c8ab53f896ca6e87628bd44b03a8e922fbe Mon Sep 17 00:00:00 2001 From: "flyingscorpio@pinebookpro" Date: Fri, 3 Sep 2021 11:19:30 +0200 Subject: [PATCH] Add factoriel and diviseurs --- alogrithmique/diviseurs.algo | 11 +++++++++++ alogrithmique/factoriel.algo | 38 ++++++++++++++++++++++++++++++++++++ 2 files changed, 49 insertions(+) create mode 100644 alogrithmique/diviseurs.algo create mode 100644 alogrithmique/factoriel.algo diff --git a/alogrithmique/diviseurs.algo b/alogrithmique/diviseurs.algo new file mode 100644 index 0000000..22a68b5 --- /dev/null +++ b/alogrithmique/diviseurs.algo @@ -0,0 +1,11 @@ +Algorithme : Affiche tous les diviseurs d'un entier lu. + +Début + Variable n, i : Entier + Lire(n) + Pour i allant de 0 à n + Si n Modulo i = 0: + Ecrire(i) + FinSi + FinPour +Fin diff --git a/alogrithmique/factoriel.algo b/alogrithmique/factoriel.algo new file mode 100644 index 0000000..10c8b31 --- /dev/null +++ b/alogrithmique/factoriel.algo @@ -0,0 +1,38 @@ +Algorithme : Calcule et affiche le factoriel d'un entier positif lu. + +Version 1 : +Début + Variable n, s, i : Entier + Lire(n) + s <- 0 + Pour i allant de 1 à n: + s <- s * i + FinPour + Ecrire(s) +Fin + +Version 2 : +Début + Variable n, s, i : Entier + Lire(n) + s <- 0 + i <- 1 + Tant que i <= n : + s <- s * i + i <- i + 1 + FinTantQue + Ecrire(s) +Fin + +Version 3 : +Début + Variable n, s, i : Entier + Lire(n) + s <- 0 + i <- 1 + Répéter + s <- s * i + i <- i + 1 + Jusqu'à i = n + Ecrire(s) +Fin