Ler um número inteiro, separar seus dígitos e imprimí-los individualmente separados por espaços - Desafio de Programação Resolvido em Portugol

Informe um valor inteiro de três dígitos: 398
Os dígitos separados são: 3 9 8

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

// Como separar um número em seus dígitos individuais
programa {
  funcao inicio() {
    // variáveis usadas na resolução do problema
    inteiro valor, primeiro, segundo, terceiro

    // vamos solicitar ao usuário que informe um valor inteiro
    // na faixa 100 a 999 (incluindo)
    escreva("Informe um valor inteiro de três dígitos: ")
    leia(valor)

    // vamos verificar se o valor está na faixa permitida
    se ((valor < 100) ou (valor > 999)) {
      escreva("Valor fora da faixa permitida")
    }
    senao {
      // vamos extrair os dígitos individualmente, da esquerda para a direita
      // vamos obter o primeiro dígito
      primeiro = inteiro(valor / 100)
      valor = valor % 100

      // vamos obter o segundo dígito
      segundo = inteiro(valor / 10)
      valor = valor % 10

      // vamos obter o terceiro valor
      terceiro = valor

      escreva("Resultado: ", primeiro, " ", segundo, " ", terceiro)
    }
  }
}