Ordem crescente

algoritmo "Ordem Crescente"
var
   a, b, c : inteiro
inicio

   escreval ("Digite 3 numeros!!")
   leia (a)
   leia (b)
   leia (c)
   limpatela

   se (a>b) e (b>c) entao
      escreval (c, b, a)
   fimse
   se (a>c) e (c>b) entao
      escreval (b, c, a)
   fimse
   se (b>a) e (a>c) entao
      escreval (c, a, b)
   fimse
   se (b>c) e (c>a) entao
      escreval (a, c, b)
   fimse
   se (c>b) e (b>a) entao
      escreval (a, b, c)
   fimse
   se (c>a) e (a>b) entao
      escreval (b, a, c)
   fimse

fimalgoritmo