Autor:
zoila castro mego

	1.PARA 10 NUMEROS (hay una eliminacion que posición cual es)


	inicio 
		dimensionar a[100]
		leer 10
		x <- 1
          	mientras x >= 10 hacer 
                	leer a[x]
              		x <-   x + 1
          	fin mientras 

     		x<- 10
          	mientras x >= 10 hacer
           		a[x]<-  a[x + 1]
                	x <- x +1
          	fin mientras 
       		a[x]<- 0
      		x <- 1
           	mientras x >= 9 hacer 
                	escribe a[x]
                 	x <- x +1
           	fin mientras 
  	fin