Calculo De Amod N; Traduccion En Los Calculos Algoritmicos - HP 40G Manual Del Usuario

Calculo Simbólico y Matemático con la HP 40G
WHILE N MOD D == REPEAT
K+1 -> K:
N/D -> N:
END:
IF K 0 THEN
¹
CONCAT (L1, D, K
{ }
END:
2+D - D:
>
END:
IF K 1 THEN
¹
CONCAT (L1, N,1
{ }
END:
DISP 3 "FACT " L1:
;
FREEZE:
8.4 Calculo de A
8.4.1

Traduccion en los Calculos Algoritmicos

Primer algoritmo.
Se usan dos variables locales PUIS e I
Se hace un programa interactivo de manera que cada etapa PUIS representa A
(mod N).
funcion puismod (A, P, N)
local PUIS, I
1 - PUIS
>
para I de 1 a P ejecutamos
A*PUIS mod N - PUIS
>
/fpara/
resultado PUIS
/ffuncion/
156
- L1:
>
- L1:
>
P
MOD N
I
Programas de Aritmetica