Algoritmos y Programación en Pascal

15.2. Ordenación de arrays 319
1
2
3
4
5
òrsula
Enrique
Orlando
Adri‡n
Isabel
. . .
. . .
. . .
. . .
. . .
Ordenaci—n
Figura 15.6.
Adri‡n
Enrique
Isabel
Orlando
òrsula
Una posibilidad interesante consiste en crear otro vector vectPosic de la
forma
array[1..N] of [1..N]
cuyas componentes refieren una ficha completa, mediante su posición, siendo
inicialmente
vectPosic[i] = i ∀i ∈ {1, . . . N}
El interés de esta representación indirecta reside en aplicar este método a
cualquiera de los algoritmos de ordenación estudiados, con la ventaja de que la
ordenación se puede efectuar intercambiando las posiciones en vez de los registros
(extensos) completos.
Por ejemplo, supongamos que el tipo de datos tFicha es un registro con
datos personales, entre los que se incluye el nombre. La figura 15.6 muestra el
vector vectFich antes y después de la ordenación.
Si no se emplea el método de los vectores paralelos, el algoritmo de ordenación
empleado debería incluir instrucciones como las siguientes:
if vectFich[i].nombre > vectFich[j].nombre then begin
{Intercambiar vectFich[i], vectFich[j]}
elemAux:= vectFich[i];
vectFich[i]:= vectFich[j];
vectFich[j]:= elemAux
end
Como se puede comprobar, en las instrucciones de intercambio es necesario
mantener tres copias de elementos del tipo tElemento. Sin embargo, si se utiliza
un vector paralelo (como se muestra en la figura 15.7), sólo se producen
cambios en el vector de posiciones. El fragmento de código correspondiente a los
intercambios quedaría como sigue:
1
2
3
4
5
. . .
. . .
. . .
. . .
. . .