La Función "Esprimo; Traduccion En Los Calculos Algoritmicos - HP 40G Manual Del Usuario

8.5 La función "esprimo"
8.5.1

Traduccion en los Calculos Algoritmicos

Primer algoritmo
Vamos a escribir una función booleana de parámetro N, que sea igual a
VERDADERO cuando N sea primo y sino será igual a FALSO.
Hay que buscar si n posee un divisor
N).
En el caso N=1 se trata aparte!
Se usa la variable booleana PREM que parte de VERDADERO y pasa a
FALSO cuando encontramos un divisor de N...
Funcion esprmo (N)
local PREM, I, J
E( N) - J
Ö >
si N = 1 entonces
Falso - PREM
>
Si no
Verdadero- PREM
>
/fsi/
2- I
>
mientras que PREM y I
si N mod I=0 entonces
Falso- PREM
>
si no
I+1- I
>
/fsi/
/fmientras/
resultado PREM
Programas de Aritmetica
Calculo Simbólico y Matemático con la HP 40G
1 y
¹ £
J ejecutar
£
E( N) (parte entera de la raíz de
Ö
159