我正在尝试仅使用减法来创建除法函数。到目前为止,我已经足够处理积极的数字。不断欺骗我的是处理负数。我可以继续,只是抓住x和y的绝对值,它完美地工作,但我的答案永远不会是消极的。这里的任何人都必须以前做过类似的事情吗? (define Divide (lambda (a b c)
(if (> a 0)
(Divide (- a b) b (+ c 1))
我正在研究计划中的作业MetaCircular评估者,并且我需要允许用户通过将其添加到表中来安装特殊的表单。这个想法是,当用户输入诸如(square 5)之类的东西时,评估者将查找名为square的表格。如果找到,它将返回lambda声明,如(lambda (x) (* x x))。 当代码返回lambda语句时出现问题。我收到以下错误信息: Error: Bad function object: