Algoritmo que imprima los números pares entre 0 y 100.




Proceso Numerospares
Definir i Como Entero
Escribir "Numeros pares";
Para i<-1 hasta 100 Con Paso 1 Hacer
si i%2=0 entonces
Escribir "numero par";
Escribir " ",i;
FinSi
FinPara
FinProceso