-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy path3-7 nombre_premier
More file actions
60 lines (33 loc) · 1.09 KB
/
3-7 nombre_premier
File metadata and controls
60 lines (33 loc) · 1.09 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
BUT:
Définir si un nombre est premier:
s'il n'admet comme diviseur 1 et lui-même
METHODE:
On va passer en revue tous les chiffres de 2 (tous les chiffres sont divisibles par 1) à lui-même -1 (tous les chiffres sont divisibles par eux-mêmes)
Si chiffre est divisible par un autre le MOD est égal à O
Dans ce cas on attribue une valeur à un testeur.
A la fin de la boucle si le testeur a gardé la valeur initiale
----
----
DONNEES A ENTRER:
Le nombre à tester
Structure répétitive:
nbre indéterminé --> POUR
Strucutre de choix:
Test:
Algo: nbre_premier
Déclarations:
nbre : réel {le nombre à tester}
test : chaîne(30) {pour faire la somme des diviseurs}
i: réel {l'indice de la boucle}
d: réel {le résultat de la division}
Début:
test <- " est un nombre premier."
Ecrire ("Indiquer le nombre à tester (supérieur à 1")
Lire (nbre)
Pour i allant de 2 à nbre-1
Faire
d <- nbre MOD i
Si d = 0 Alors test <- " n'est pas un nombre premier." FinSi
FinPour
Ecrire ("Le nombre " ,nbre ,test)
Fin: nbre_premier