134 Chapitre 7 – Programmes d’arithm´etique
0 ->K:
CLEAR L1:
WHILE N MOD 2 == 0 REPEAT
1+K -> K:
N/2 -> N:
END:
IF K 6= 0 THEN
{2,K} ->L1:
END:
3 ->D:
WHILE D*D
6 N REPEAT
0->K:
WHILE N MOD D == 0 REPEAT
K+1 -> K:
N/D -> N:
END:
IF K 6= 0 THEN
CONCAT (L1,{D,K}) -> L1:
END:
2+D -> D:
END:
IF N 6= 1 THEN
CONCAT (L1, {N,1}) -> L1:
END:
DISP 3; "FACT" L1:
FREEZE:
7.4 Calcul de A
P
mod N
7.4.1 Traduction Algorithmique
-Premier algorithme
On utilise deux variables locales PUIS et I.
On fait un programme it´eratif de fa¸con qu’`a chaque ´etape PUIS
repr´esente A
I
(mod N).
Comentários a estes Manuais