Ejercicios con mientras # 2

Elaborar un programa que indique los 15 primeros números primos.

______________________________________________________________



Proceso quince_primeros_numeros_primos
num<-1;
cont<-0;
Mientras cont<15 Hacer
ceros<-1;
div<-1;
Mientras div<num Hacer 
respuesta<-num mod div;
Si respuesta=0 Entonces
ceros<-ceros+1;
FinSi
div<-div+1;
FinMientras
Si ceros<=2 Entonces
Escribir num;
cont<-cont+1
FinSi
num<-num+1;
FinMientras
FinProceso