|
|
|
procedimiento ELIMINAR( x : tipo_clave, ref raíz
: ÁRBOL) |
|
inicio |
|
aux, ant : puntero_nodo |
|
si raíz = NULO entonces |
|
/*No existe nodo con clave x:
Implementar según especificación*/ |
|
sino |
|
si x < raíz.clave entonces |
|
ELIMINAR(x, raíz.izq) |
|
sino |
|
si x > raíz.clave
entonces |
|
ELIMINAR(x, raíz.der) |
|
sino |
|
inicio /*x = raíz .clave */ |
|
aux ¬ raíz |
|
............................. |
|
fin |
|
fin |
|