Shellsort
Origem: Wikipédia, a enciclopédia livre.
[editar] Shell Sort
A continuación se muestra un algorítmo para la ordenación de un vector, usando el método Shell Sort.
Está programado en WinPseudo 1.3 - Interprete de PseudoCodigos.
[editar] Codificación el WinPseudo 1.3
// Shell Sort. Herbert Schildt, "Advanced C", Pag. 13.
INICIO Programa 18 - Shell Sort. Herbert Schildt, "Advanced C", Pag. 13.
VAR
VECTOR Vect[150]
VECTOR A[5]
NUMERICO i
NUMERICO j
NUMERICO k
NUMERICO s
NUMERICO w
NUMERICO Aux
NUMERICO Cant
FIN-VAR
Cant = 150
i = 0
MIENTRAS (i < Cant)
Vect[i] = Cant - i
i = i + 1
FIN-MIENTRAS
A[0] = 9
A[1] = 5
A[2] = 3
A[3] = 2
A[4] = 1
w = 0
MIENTRAS (w < 5)
k = A[w]
s = 0 - k
i = k
MIENTRAS (i < Cant)
Aux = Vect[i]
j = i - k
SI (s = 0)
s = 0 - k
s = s + 1
Vect[s] = Aux
FIN-SI
MIENTRAS ((Aux < Vect[j]) & (j >= 0) & (j <= Cant))
Vect[j+k] = Vect[j]
j = j - k
FIN-MIENTRAS
Vect[j+k] = Aux
i = i + 1
FIN-MIENTRAS
w = w + 1
FIN-MIENTRAS
i = 0
MIENTRAS (i < Cant)
imprimir entero (Vect[i])
imprimir ", "
i = i + 1
FIN-MIENTRAS
FINAL
