sábado, 30 de outubro de 2010

Lista dia 25 de outubro - 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)

algoritmo "calcular o resultado de uma operação de divisão inteira com a subtração"

var
   x,y,subtracao:inteiro
inicio
  subtracao <- 0
   escreva("Entre com um número: ")
   leia(x)
   escreva("Entre com um número divisor: ")
   leia(y)
        se x < y entao
         escreva ("Não é possível fazer uma divisão inteira")
        fimse
   escreva(x," / ",y," = ")
   para x de x ate 1 passo -1 faca
      subtracao <- subtracao 1
      x <- y - x
   fimpara
   escreva(subtracao)

fimalgoritmo

Um comentário:

  1. Olá. Na hora de apresentar o resultado, seu algoritmo retorna zero e não o valor da divisão, no exercício pede-se que calcule a divisão através da subtração. Eu fiz assim:

    y<-0
    soma<- 0
    escreva("Entre com um número:")
    leia(x)
    escreva("Entre com um número divisor:")
    leia(y)

    se(x<y) entao
    escreva("Não é possível realizar uma divisão inteira")
    senao
    soma<-x
    vezes<-0
    repita
    soma<-soma-y //Descresce o valor de x
    vezes<-vezes+1 //Conta quantas vezes isso acontece até a soma chegar a 0, assim
    //tem-se o resultado da divisão
    ate(soma=0)
    escreval(x," / ",y," = ",vezes)
    fimse
    fimalgoritmo

    Também não sei como ou se precisa apresentar no escreva algo assim -> 12/4 = 12-4=8-4=4-4=0

    Blog muito bom, parabéns :)

    ResponderExcluir