计划中的问题

Question

Scheme的下一个程序解决了Hanoy塔的问题是什么？

(define tower_of_hanoi
  (lambda (move discs from to using)
    (if (> discs 0)
        ((tower_of_hanoi move (- discs 1) from using to)
        (tower_of_hanoi move (- discs 1) using to from)))))

(procedure application: expected procedure, given: #void; arguments were: #void)

谢谢大家

Answer 1

在您的代码中，您正在（）中调用了两个函数。 使用该符号时，您的符号必须是一个函数/过程。 所以你得到了错误。

检查下面的代码。 我改成了(and

(define tower_of_hanoi
  (lambda (move discs from to using)
    (if (> discs 0)
        (and (tower_of_hanoi move (- discs 1) from using to)
             (display move)(display " from ")(display from) (display " to ")(display to) (display "\n")
             (tower_of_hanoi move (- discs 1) using to from)))))