Question

alguem me ajuda porfavor
Faça um algoritmo para ler um vetor de 10 números inteiros e depois exibi-lo em ordem inversa. obs: em portugol (utilizo o visualg)

Answer 1

Var

  vet: vetor[1..10] de inteiro

  linha: inteiro

Inicio

     para linha de 1 ate 10 faca

          escreval ("Digite um valor para inserir no vetor e aperte enter.")

          leia (vet[linha])

     fimpara

     

     escreval("Os valores do vetor são: ")

     para linha de 1 ate 10 faca

          se linha < 11 entao

             escreva (vet[linha])

          fimse

     fimpara

     escreval("")

     escreval("Os valores do vetor de forma inversa são: ")

     para linha de 10 ate 1 passo -1 faca

          se linha > 0 entao

             escreva (vet[linha])

          fimse

     fimpara

     

Fimalgoritmo