![]() |
Enunciado: Realizar un código que cumpla la función de una división mediante restas sucesivas en racket.
pseudocódigo
Proceso DivisionPorRestas
contador <- 0
Escribir "Porfavor ingresar dividendo: "
Leer dividendo
Escribir "por favor ingresar Divisor: "
Leer divisor
dividendo <- dividendo - divisor
Mientras dividendo >= 0 hacer
contador <- contador + 1
dividendo <- dividendo - divisor
FinMientras
Escribir "la division es igual a: ", contador
FinProceso
Algoritmo de la división por resta
si no te queda claro con los anteriores ejemplos te dejamos un video con la prueba de escritorio y explicación del código resuelto. este video y el código fueron hechos por una estudiante de la UTP - universidad tecnológica de pereira. Este es su CANAL DE YOUTUBE.
; ===========================================================================
#lang racket
(define (division dividendo divisor acumula)
(if (<= dividendo 0)
(display acumula)
(division (- dividendo divisor) divisor (+ 1 acumula))
)
)
(division 6 2 0)
; ===========================================================================

