Finish notes, add premier

This commit is contained in:
flyingscorpio@pinebookpro 2021-09-03 13:42:55 +02:00
parent 9a961d43be
commit 0326b7f4bf
2 changed files with 14 additions and 0 deletions

View file

@ -6,6 +6,7 @@ Début
min <- 20
nombre_notes <- 0
somme <- 0
Ecrire("Taper les notes une par une, finir par -1")
Tant que note != -1:
Lire(note)
somme <- somme + note

View file

@ -0,0 +1,13 @@
Algorithme : Lit un entier et indique s'il est premier.
Début
Variable n, i : Entier
Lire(n)
Pour i allant de 2 à n/2:
Si n Modulo i = 0:
Ecrire("Non premier")
Retourner
FinSi
FinPour
Ecrire("Premier")
Fin