-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Muestra una serie de N números primos
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Algoritmo ProcesoPrimos
Escribir Sin Saltar "Ingrese la cantidad de números primos:";
Leer n;
i <- 2;
Mientras n > 0 Hacer
divisor <- 2;
Mientras (divisor < i) Y ((i MOD divisor) <> 0) Hacer
divisor <- divisor + 1;
FinMientras
Si divisor = i Entonces
Escribir i;
n <- n - 1;
FinSi
i <- i + 1;
FinMientras
FinAlgoritmo
Escribir Sin Saltar "Ingrese la cantidad de números primos:";
Leer n;
i <- 2;
Mientras n > 0 Hacer
divisor <- 2;
Mientras (divisor < i) Y ((i MOD divisor) <> 0) Hacer
divisor <- divisor + 1;
FinMientras
Si divisor = i Entonces
Escribir i;
n <- n - 1;
FinSi
i <- i + 1;
FinMientras
FinAlgoritmo