hola chavos esta es mi primera publicacion y espero que les ayude en algo y comente

Proceso numero primo
Escribir "ingrsar el numero"
Leer x
si x = 1 Entonces
Escribir "El numero es primo"
Sino
a<-0
FinSi
Para i<-1 Hasta x Hacer
si x mod i = 0 Entonces
a<-a+1
FinSi
finpara
si a = 2 Entonces
Escribir "El numero es primo"
Sino
Escribir "El numero no es Primo"
FinSi
FinProceso