2.De un ejercicio dado modificar el programa de eliminación para que elimine elementos mientras el sw sea 0(cero).

INICIO
  |	Dimensionar a(100)
  |	leer n	
  |	x<- 1
  |	mientras x<=n hacer
  |	  |  leer a(x)
  |	  |   x<-x+1
  |	fin-mientras
  |               sw<- 0
  |             mientras sw=0 hacer
  |                 |  leer sw//cuando es diferente de 0 termina
  |                 |  SI sw=0 ENTONCES
  |                 |   | Leer pos
  |	    |   |	x<-pos
  |	    |   | mientras x<n hacer
  |	    |   |   |  a(x)<-a(x+1)
  |	    |   |   |    x <- x+1
  |	    |   | fin-mientras
  |                 |   |      a(x)<-0
  |                 |   |         n<- n-1
  |	    | FIN-SI
  |             fin-mientras
  |	  x<-1
  |	mientras x<=n hacer
  |	  |  escribe a(x)
  |	  |    x<-x+1
  |	fin-mientras
  |
 FIN

Autores:
              ROSA  L. SENMACHE  FLORES.
	ALAN PAREDES FAJARDO