Ler um número inteiro na faixa 0-999 e mostrar a soma de seus dígitos - Desafio de Programação Resolvido em Portugol

Informe um valor inteiro (0-999): 523
A soma dos dígitos é: 10

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

// Mostrar a soma dos dígitos de um número inteiro
programa {
  funcao inicio() {
    // variáveis usadas na resolução do problema
    inteiro valor, terceiro, segundo, primeiro, soma

    // vamos solicitar ao usuário que informe um valor inteiro
    // na faixa 0 a 999 (incluindo)
    escreva("Informe um valor inteiro (0-999): ")

    // vamos ler o valor informado
    leia(valor)

    // vamos verificar se o valor está na faixa permitida
    se ((valor < 0) ou (valor > 999)) {
      escreva("\nValor fora da faixa permitida\n")
    }
    senao {
      // vamos obter o terceiro dígito
      terceiro = valor % 10
      // obtém os digitos restantes
      valor = inteiro(valor / 10)

      // vamos obter o segundo dígito
      segundo = valor % 10
      // obtém os digitos restantes
      valor = inteiro(valor / 10)

      // vamos obter o primeiro dígito
      primeiro = valor % 10

      // vamos obter a soma dos dígitos
      soma = terceiro + segundo + primeiro

      // vamos mostrar o resultado
      escreva("\nA soma dos dígitos é: ", soma, "\n")
    }
  }
}