1
(define (layer li)
  (cond ((null? l) li)
        ((null? (cdr li)) (list (car li)))
        (else ((cons (list (car li)) (layer (cdr (li))))))))

这是我上面的代码。

我正在尝试运行(层'(1 2 3))

但我在下面不断收到此错误消息。谁能告诉我我做错了什么?谢谢!

. . 申请:不是程序;期望可以应用于给定参数的过程:'(1 2 3)参数...:[无]

4

0 回答 0