Proceso ejercicio_trece

	definir vector Como Entero;
	Dimension vector[10];
	definir i Como Entero;

	Definir  a Como Entero; //5
	Definir  b Como Entero; // 10

	Definir mayor Como Entero;
	Definir aux Como Entero;

	//inicializamos el mayor con dato bajo asi cualquiera puede ser mayor
	mayor <-0;

	Escribir 'ingrese a';
	leer a;

	Escribir 'ingrese b';
	leer b;

	para i<-0 hasta 9 con paso 1 Hacer
		Escribir 'ingrese un numero';
		Leer vector[i];
	FinPara

	para i<-0 hasta 9 con paso 1 Hacer
		Escribir "en el arreglo esta el numero ",vector[i];
	FinPara

	para i<-0 hasta 9 con paso 1 Hacer
		aux<-vector[i];
		si (aux>a) Y (aux<b) Entonces
			si (aux > mayor) Entonces
				mayor<-aux;

			FinSi
		FinSi
	FinPara

	Escribir "el valor maximo es de ...",mayor;



FinProceso