Scheme 在racket中将两张列表压缩在一起

我正在尝试编写一个名为zip的函数，它接受两个列表作为参数，并返回一个列表，其中的元素可以从原始列表中选择

例如，（zip'（ab c）'（x y z））应评估为（a x b y c z）

骨架解决方案：

(define (zip l1 l2)
  (cond ((null? l1) l2)
        ((null? l2) l1)
        (else (cons ??? (cons ??? (zip ??? ???))))))

自己填写

？

。：-）

骨架解决方案：

(define (zip l1 l2)
  (cond ((null? l1) l2)
        ((null? l2) l1)
        (else (cons ??? (cons ??? (zip ??? ???))))))

---

自己填写

？

。：-）

使用递归，不导入任何内容使用递归，不导入任何内容