algoritmo 2012

Proceso
s<-1;
n<-0;
i<-0;
minimo<-999999999999;
maximo<-0;
Mientras s<=5 Hacer
Escribir "escriba un numero";
Leer n;
Si n>maximo Entonces
maximo<- n;
finsi
si n<minimo ENTONCES
minimo <-n;
finsi
s<-s+1;
FinMientras
Escribir "el numero minimo es ",minimo;
Escribir "el numero maximo es ",maximo;
Si maximo mod 2=0 y minimo mod 2=0 Entonces
Escribir "SON PARES";
Sino
Si maximo mod 2<>0 y minimo mod 2<>0 Entonces
i<-maximo+minimo;
Escribir "la suma de los impares es ",i;
FinSi
FinSi
Si maximo mod 2 = 0 y minimo mod 2 <> 0 o minimo mod 2= 0 y maximo mod 2 <>0 Entonces
Escribir " debe repetirse " ;

FinSi
FinProceso