Como somar o primeiro e o último dígito de um número inteiro informado pelo usuário em VisuAlg - Desafio de Programação Resolvido em VisuAlg

Informe um número inteiro: 48763
A soma do primeiro e do último dígito é: 7

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

algoritmo "Somar o primeiro e o último dígito de um número"

var
  numero, soma, quant, primeiro_digito: inteiro
  ultimo_digito: inteiro

inicio
  // vamos pedir para o usuário informar um número inteiro
  escreva("Informe um número inteiro: ")
  leia(numero)

  // vamos obter a quantidade (-1) de dígitos no número informado
  quant <- Int(Log(numero))

  primeiro_digito <- Int(numero / Exp(10, quant))
  ultimo_digito <- numero Mod 10
  	
  // soma o primeiro e o último dígito
  soma <- primeiro_digito + ultimo_digito
	
  // mostra o resultado
  escreva("A soma do primeiro e do último dígito é: ", soma)

fimalgoritmo