Lista De Ejercicios Pilas Y Colas






FUNDAMENTOS DE PROGRAMACION II
asignatura



GRUPO: 02











2011































EJERCICIO:
Una empresa lo ha contratado a usted para que elabore un programa en el cual usted utilice una lista doblemente enlazada (Lista ordenada no repetida) en el cual contenga los números de los departamentos que intervienen en lacompañía, de existir algún elemento repetido el programa debe sacar un mensaje alusivo a lo que pasa.


1. Se requiere que usted elabore un pseudo código que permita crear la lista que observa en la grafica.

Registro: nodo
Entero: info
Puntero nodo: ant
Puntero nodo: sig.
Fin registro

Registro: L
Punteronodo pL
Fin registro

Procedimiento Crear_lista ()Puntero nodo: cab, q

Cab=pedir_memoria ()
cab.info=25
cab.ant=NULL
q=pedir_memoria ()
q.info=35
q.ant=cab
cab.sig=q
q=pedir_memoria ()
q.info=40
cab.sig.sig= q
q.ant=cab.sig
q.sig=NULL
Fin procedimiento






2. Se requiere que usted realice un pseudocódigo que permita ingreso de la dependencia 38,30, 45, 25.

Función Insertar_Ordenada(puntero nodo: A,entero: Dato)
Si(A=null)entonces
Función Insertar_List(A.ant,entero:Dato)
sino
Mientras(A null)
Si(A.info>Dato)entonces
Función Insertar_List(A.ant,entero:Dato)
Fin si
A=A.sig
Fin Mientras
Fin si
Fin Función

Función Insertar_List (puntero nodo: p, entero: Dato)
puntero nodo: Nuevo, q
si (p==null) entonces
escriba “no se puedeinsertar el dato”
sino
nuevo=Pedir_ Memoria ()
q=p.sig
nuevo.info= Dato
nuevo.ant=p
nuevo.sig=q
p.sig=nuevo
si (qnull) entonces
q.ant=nuevo
fin si
fin si
Fin Función



3. Además requiere que usted realice un Procedimiento para realiza la eliminación de los siguiente departamentos 30 y 45
Función Buscar_eliminar (entero dato)
q = cab
Mientras(qNULL)
Si (q.info=dato) entonces
Eliminar (cab, p, dato)
Salga; //break
Fin si
q=q.sig
Fin mientras
Fin función


Función Eliminar (puntero nodo: cab, puntero nodo: p, entero: dato)
puntero nodo: r, q

Si (p==NULL) entonces 
escriba “no se puede eliminar”
Sino
r=p.ant
q= p.sig
si (r=NULL) entonces //apunta al primer nodo
 si (q=NULL)entonces //apunta al único nodo existente
cab.sig = NULL
escriba “la lista quedó vacía”
sino  //primer nodo con más elementos
cab.sig=p.sig
q.ant=NULL
fin si
sino 
si (q=NULL) entonces //apunta al último nodo
r.sig=NULL
    sino //apunta al nodo intermedio
 r.sig =q
 q.ant=r
 fin si
Fin si
Finsi
libere (p)
Fin función





4. Realizar un procedimiento que permita imprimir la lista en forma descendente.
//la lista se encuentra ordenada por su creación e inserción
//sencillamente se realiza un recorrido hacia atrás
Función imprimir_ descendente ()
q=cab
Mientras (qNULL)
Escriba q.info
q=q.ant
Fin mientras
Fin función










5. Realizar unprocedimiento para obtener el número mayor.
//la lista se encuentra ordenada por su creación e inserción de menor a mayor
Función mayor ()
q=cab
Mientras (qNULL)
q=q.sig //recorrido hacia adelante
SI (q=NULL) //último término
Escriba “Numero Mayor:”, q.info
Fin si
Fin mientras
Fin función
Función Buscar_ Repetidos (puntero nodo: R)
puntero nodo: Z=R, A=RMientras (Z null)
Mientras(R null)
Si (R. dato= Z. dato) entonces
Escriba “El elemento”, R.dato, “Se encuentra repetido Desea eliminarlo? (S/N)”
Lea rta
Si (rta =”S”) Entonces
Eliminar (A, R, R. Dato)
Fin si
Fin si
A=R
R=R.sig
Fin mientras
Z=Z.sig
Fin Mientras
Fin Función

//Programa Principal del Ejercicio
Inicio
Crear_lista ()...