estou tentando ordenar um vetor utilizando a ordenação QuickSort em visualg ,mas não esta funcionando, alguem poderia ajudar? Obrigado pela atenção.
código:
varvetorAleatorio: vetor [1..100] de inteirox: vetor [1..100] de inteiroi,j,minimo,auxiliar:inteiroa, pivo,IniVet,FimVet:inteiroprocedimento QuickSort(X[], IniVet, FimVet:inteiro)i <- 1j <- 100pivo <- X[(1 + 100) div 2]enquanto(i < j) enquanto (X[i] < pivo) faca i <- i + 1 fimenquanto enquanto (X[j] > pivo) faca j <- j - 1 fimEnquanto se (i <= j) então auxiliar <- X[i] X[i] <- X[j] X[j] <- auxiliar i <- i + 1 j <- j - 1 fimSefimEnquantose (j > IniVet) então QuickSort(X, IniVet, j)fimSese (i < FimVet) então QuickSort(X, i, FimVet)fimsefimprocedimentoinicio//criando vetor aleatoriopara i de 1 ate 100 faca vetorAleatorio[i]<-RandI(100)fimpara//copiando o vetor aleatorio para os outrospara i de 1 ate 100 faca x[i]<-vetorAleatorio[i]fimparacronometro onQuickSort()cronometro offfimalgoritmo