5. MOSTRAR ARTICULOS DE ABARROTES ORDENADOS POR MAYOR PRECIO Y MOSTRAR LOS 5 ARTICULOS DEMENOR PRECIO
       
Inicio
	Dimensionar articulo[100],precio[100]
	enteroi,j,NE
	real aux1
	caracter aux2
	leer NE
	si(NE>0)entonces
		para i=0 hasta i<NE
			leer articulo[i],precio[i]
		fin_para
		para i=0 hasta i<NE-1                     
			para j =i+1 hasta j<NE
				si(precio[i] < precio[j]) entonces
					aux1<- precio
					aux2<- articulo[i]
					precio[i]<- precio[j]
					articulo[i]<- precio[j]
					precio[j]<- aux1
					articulo[j]<- aux2
				fin_si  
			fin_para
		fin_para
		para i=0 hasta i<NE
			escribir articulo[i],precio[i]
		fin_para
		para i=NE hasta i>5
			escribir articulo [i],precio[i]
		fin_para
	sino
		escribir "arreglo vacio"
	fin_si
Fin


Autor
CASTILLO DÍAZ MARGARITA