Um algoritmo que lê três números e os classifica e exibe em ordem crescente - Desafio de Programação Resolvido em VisuAlg

Informe o primeiro valor: 7
Informe o segundo valor: 4
Informe o terceiro valor: 6
Os números ordenados em ordem crescente são: 
4  6  7

algoritmo "Ler três números e classificar em ordem crescente"

var
  num1, num2, num3, temp: inteiro

inicio
  // vamos pedir que o usuário informe três números inteiros
  escreva("Informe o primeiro valor: ")
  leia(num1)
  escreva("Informe o segundo valor: ")
  leia(num2)
  escreva("Informe o terceiro valor: ")
  leia(num3)

  // o primeiro número é maior que o segundo? vamos trocá-los
  se num1 > num2 entao
    temp <- num1
    num1 <- num2
    num2 <- temp
  fimse

  // o segundo número é maior que o terceiro? vamos trocá-los
  se num2 > num3 entao
    temp <- num2
    num2 <- num3
    num3 <- temp
  fimse

  // depois da segunda troca o número 1 é novamente maior que o número 2?
  se num1 > num2 entao
    temp <- num1
    num1 <- num2
    num2 <- temp
  fimse

  // mostra o resultado
  escreval("Os números ordenados em ordem crescente são: ")
  escreval(num1 ,"  ", num2, "  ", num3)

fimalgoritmo