Proceso suma_de_numeros_par_e_impar
definir x,y Como Entero;

x<-0;
Mientras x<=3 Hacer
Escribir "introdusca cantidad: ";
Leer x;
Si (x%2=0) Entonces
Escribir "es par ", x;
Sino
Escribir "es impar ", x;
FinSi
y<-x;
y<-y+x;
Escribir "la suma es :", y;
FinMientras

FinProceso