Как исправить этот код, логическая проблема, я думаю - PullRequest
2 голосов
/ 11 июня 2019

Я нахожусь в университете, программирую на первом курсе, так хорошо, что я застрял в этом упражнении, я должен выполнить функцию, которая: функция (n1 n2) = n1 * n2 но без использования оператора *.

Что мы можем использовать? Предыдущая функция, которая добавляет два числа

; Принимает два числа как ввод и возвращает сумму между ними

; Номер Номер -> Номер

; (сумма 2 3) = 5

 (define (sum n1 n2)
    (cond
        [(zero? n1) n2]
        [(positive? n1) (sum (sub1 n1) (add1 n2))]
  ))

Хитрость в том, чтобы не использовать + или *, в том, что мы должны сделать это с помощью функции рекурсии.

Итак, вот что я сделал, и эта функция должна возвращать умножение двух чисел, поэтому мы знаем, что умножение 3 * 2 равно 3 + 3 или 2 + 2 + 2, поэтому я пытаюсь сделать это здесь но я не могу понять больше, чем это

; Принимает два числа как ввод и возвращает умножение между ними

; Номер Номер -> Номер

; (мульт 3 2) = 6

  (define (mult n1 n2)
     (cond
         [(zero? n1) n2]
         [(positive? n1) (mult (sub1 n1) (sum n1 n2))]
    ))

Выход (mult 3 2) равен 8, что явно не делает то, что мне нужно.

С уважением от начинающего студента-программиста

Решено!

 (define (mult n1 n2)
     (cond
         [(or (zero? n1) (zero? n2)) 0] ;verify if zero is one of the inputs and return it
         [(eq? 1 n1) n2] ;if n1 is one return n2
         [(eq? 1 n2) n1] ;if n2 is one return n1
         [(positive? n1) (sum n2 (mult (sub1 n1) n2))] ;if it none of the adove, add n2 n1Times to itself
  ))

Спасибо! @Barmar @ coredump

1 Ответ

0 голосов
/ 11 июня 2019

Подсказка: здесь приведен след выполнения ожидаемой рекурсивной функции с аргументами 5 и 3, где каждый вложенный уровень соответствует рекурсивному вызову MULT:

  0: (MULT 5 3)
    1: (MULT 4 3)
      2: (MULT 3 3)
        3: (MULT 2 3)
          4: (MULT 1 3)
            5: (MULT 0 3)
            5: MULT returned 0
          4: MULT returned 3
        3: MULT returned 6
      2: MULT returned 9
    1: MULT returned 12
  0: MULT returned 15

Обратите внимание, что глубина рекурсии здесь равна 5, но вы могли бы быть умнее, и вместо этого было бы 3.

...