Como retornar o resto da divisão entre dois números inteiros sem usar o operador de módulo - Exercícios Resolvidos de VisuAlg

Primeiro número inteiro: 11
Segundo número inteiro: 7
O resto da divisão é: 4

Primeiro número inteiro: 9
Segundo número inteiro: 2
O resto da divisão é: 1

Primeiro número inteiro: 13
Segundo número inteiro: 5
O resto da divisão é: 3

algoritmo "Resto da divisão sem usar o operador módulo em VisuAlg"

var
  // variáveis necessárias para resolver o problema
  a, b, resto: inteiro

inicio
  // vamos ler os dois números inteiros
  escreva("Primeiro número inteiro: ")
  leia(a)
  escreva("Segundo número inteiro: ")
  leia(b)

  // agora vamos calcular o resto da divisão
  resto <- a - ((Int(a / b)) * b)

  // e mostramos o resultado
  escreva("O resto da divisão é: ", resto)

fimalgoritmo