Algoritmo
    declare    vetor[100]
            contador1
            contador2
            aux
            numerico
            
    //Atribui valores iniciais necessários
    contador1 <- 1
    contador2 <- 1
    
    //Preenche vetor
    repita
        se (contador1 > 100) entao
            interrompa
        fimse
        escreva("Informe um valor para o vetor: ")
        leia(vetor[contador1])
        contador1 <- contador1 + 1
    fimrepita
    
    //Ordena vetor de forma crescente
    contador1 <- 1
    repita
        se (contador1 > 100) entao
            interrompa
        fimse
        contador2 <- 1
        repita
            se(contador2 > 100) entao
                interrompa
            fimse
            se(vetor[contador1] < vetor[contador2]) entao
                aux <- vetor[contador1]
                vetor[contador1] <- vetor[contador2]
                vetor[contador1] <- aux
            fimse
            contador2 <- contador2 + 1
        fimrepita
        contador1 <- contador1 + 1
    fimrepita
    
    //Mostra vetor
    contador1 <- 1
    repita
        se (contador1 > 100) entao
            interrompa
        fimse
        escreva(vetor[contador1])
        contador1 <- contador1 + 1
    fimrepita
fimalgoritmo