Algoritmos e LD1 exercício 6

6. Faça um programa que seja capaz de calcular o resultado de uma operação de divisão inteira (x dividido y), utilizando-se para isso apenas do operador de subtração (-).

Ex.: 12 / 3 = 4 = 12-3=9-3=6-3=3-3=0 (4 vezes)


Resposta:

algoritmo "6"

var

   i,n,x:inteiro

inicio

   x <- 0

   escreva("Digite um número: ")

   leia(n)

   escreva("Digite um divisor: ")

   leia(i)

   escreva (n," dividido por ",i," é igual a ")

   enquanto (n >= i) faca

      x <- x+1

      n <- n - i

   fimenquanto

   escreva(x)

fimalgoritmo