-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy path3-8 calcul_puissance
More file actions
60 lines (37 loc) · 1.07 KB
/
3-8 calcul_puissance
File metadata and controls
60 lines (37 loc) · 1.07 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 parfait:
s'il est égal à la somme de ses diviseurs
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 le rajoute à un total.
A la fin de la boucle on compare ce total au chiffre donnée.
S'ils sont égaux c'est que ce chiffre est parfait.
----
----
DONNEES A ENTRER:
Le nombre à tester
Structure répétitive:
nbre indéterminé --> POUR
Strucutre de choix:
Test:
Algo: calcul_puissance
Déclarations:
a, b : réel
p: réel {le résulat de l'opération}
i: réel {l'indice de la boucle}
Début:
Ecrire ("Indiquer le nombre (a) strictement positif")
Lire (a)
Ecrire ("Indiquer le nombre (b) strictement positif")
Lire (b)
p <- a
Si b > 1 Et a > 1
Alors
Pour i allant de 1 à (b-1)
Faire
p <- p*a
FinPour
FinSi
Ecrire ("La puissance de " ,a ," par " ,b ," vaut " ,p)
Fin: calcul_puissance