Dado o vetor abaixo, crie um algoritmo em portugol que
ordene o vetor em:
a)ordem crescente
b)ordem decrescente .
Soluções para a tarefa
Resposta:
Explicação:
algoritmo "Ordenar_Vetor"
var
// Declaração de variaveis
vetA: vetor[1..8] de inteiro
i, j, aux: inteiro
inicio
// Atribuindo valores ao vetor
escreval(" Digite valores para o vetor")
para i de 1 ate 8 faca
escreva(" Posição",i,": ")
leia(vetA[i])
fimpara
limpatela
// Mostrando o vetor
escreva(" Vetor A: (")
para i de 1 ate 8 faca
escreva(vetA[i])
fimpara
escreva(")")
// Ordenando na ordem crescente
para i de 1 ate 7 faca
para j de i+1 ate 8 faca
se (vetA[i] > vetA[j]) entao
aux <- vetA[j]
vetA[j] <- vetA[i]
vetA[i] <- aux
fimse
fimpara
fimpara
// Vetor crescente
Escreval
escreva(" Vetor Crescente: (")
para i de 1 ate 8 faca
escreva(vetA[i])
fimpara
escreva(")")
// Ordenando na ordem decrescente
para j de 1 ate 7 faca
para i de j+1 ate 8 faca
se (vetA[i] > vetA[j]) entao
aux <- vetA[j]
vetA[j] <- vetA[i]
vetA[i] <- aux
fimse
fimpara
fimpara
// Vetor Decrescente
Escreval
escreva(" Vetor Decrescente: (")
para i de 1 ate 8 faca
escreva(vetA[i])
fimpara
escreva(")")
fimalgoritmo