2.- se tiene 20 temperaturas. se desea calcular su promedio y determinar cual      de todas ellas es mayor que 15°

	Inicio
		Dimen b[100]
		sum <- 0
  		para x  =1 hasta X<=20
			Leer I[x]
			Sum <- sum + I[x]
  		Fin-para
			Prom<- sum div 20
		X <-1
		Mientras x<= 20 hacer
			Si I[x] > 15 entonces 
			M[x] <- I[x]
			Fin-si
			X<-X +1
		Fin-mientras
		Escribir  prom. , M[x]
	Fin

Autor:
NUŅEZ PUSE JENNY