Question

3) Faça um algoritmo que carregue um vetor de 10 números inteiros. Calcule e mostre um vetor
resultante ordenado de maneira decrescente.
(Se puderem fazer na sintaxe do VisuAlg eu agradeço)

Answer 1

algoritmo "vetor"

var

  v: vetor [1..10] de inteiro

  i,j, aux: inteiro

   

inicio

   para i de 1 ate 10 faca

          v[i]:=i+10        //qualquer valor serve

   fimpara

   para i de 2 ate 10 faca

       para j de 1 ate 9 faca

          se (v[i] > v[j]) entao

               aux := v[i]

               v[i] := v[j]

               v[j] := aux

          fimse

       fimpara

   fimpara

   

    para i de 1 ate 10 faca

          escreval("Valor: ", v[i], "   para posição: " , i)

   fimpara

fimalgoritmo