Mayor y menor en una lista de 10 números [Para, si - entonces]

Enunciado: Recibir del usuario una lista de 10 números y decirle, cuál es el mayor y cuál es el menor. 

Para resolver este ejercicio se configuró PSeInt en el modo "Flexible" (Configurar > opciones de lenguaje> flexible)

//Recibir del usuario una lista de 10 numeros y 
//decir cual es el mayor y menor.
Algoritmo lista_numeros
	Definir i como Entero;
	Definir menor1 como Entero;
	Definir mayor1 como Entero; 
	Definir n como Entero;
	Definir aux como entero; 
	
	menor1 <- 0;
	mayor1 <- 0; 
	
	Escribir "Ingrese el 1# número: ";
	Leer n;
	Si (n > 0) Entonces
		mayor1 <- n;
	Fin Si
	menor1 <-n; 
	Para i<-0 Hasta 8 Con Paso 1 Hacer
		Escribir "Ingrese el " i+2 "# número:";
		Leer n;
		Si (n > mayor1) Entonces
			mayor1 <- n;
		Fin Si
		si (n < menor1) Entonces
			menor1 <- n; 
		FinSi
	Fin Para
	Escribir "El número mayor es: " mayor1;
	Escribir "El número menor es: " menor1;
FinAlgoritmo