Se quiser, baixe esse app ¬ Visualg, copie o código, cole, teste, altere, treine, seja feliz! Sorria! Mesmo, se o mudo fizer careta (RS!).
Exercícios
algoritmo "Ordena Vetor"
var
v: vetor[1..10] de Inteiro
c: Inteiro
c: Inteiro
Procedimento OrdenaVetor()
var
i, j, aux: Inteiroinicio
Para i <- 1 ate 9 faca
Para j <- i+1 ate 10 faca
FimPara
Se (v[i] > v[j]) entao
FimPara
aux <- v[i]
v[i] <- v[j]
v[j] <- aux
FimSe
v[i] <- v[j]
v[j] <- aux
FimProcedimento
inicio
Para c <- 1 ate 10 faca
OrdenaVetor()
EscrevaL("-------------------------------")
EscrevaL("Vetor Ordenado: ")
EscrevaL("-------------------------------")
Para c <- 1 ate 10 faca
Escreva("Digite o ", c, "o. valor: ")
Leia(v[c])
FimPara
Leia(v[c])
OrdenaVetor()
EscrevaL("-------------------------------")
EscrevaL("Vetor Ordenado: ")
EscrevaL("-------------------------------")
Para c <- 1 ate 10 faca
Escreva (v[c], " ")
FimPara