我是计划的初学者。我曾经在使用 letrec 和使用 lambda 绑定时做过类似的程序。
(define (drop l n)
(letrec ((iter (lambda(ls x)
(cond ((null? ls) ls)
((> x 1) (cons (car ls) (iter (cdr ls) (- x 1))))
(else (iter (cdr ls) n)))))) (iter l n)))
(define factorial
(lambda (n)
(letrec ((iter
(lambda (product counter)
(if (> counter n)
product
(iter (* counter product)
(+ counter 1))))))
(iter 1 1)))
但是我最近发现我们学院的估值部门不允许使用“lambda”这个结构。无论如何,在不使用 lambda 的情况下可以解决类似的问题吗?请提出任何其他替代方案。