主页 / 问题 / 1354329
Accepted
StillStealSteel
Asked:2022-04-27 00:53:20 +0000 UTC2022-04-27 00:53:20 +0000 UTC

用lisp写一个递归函数，子列表元素的成对相加

  • 772

我开始了解 Lisp，但我被困在一项任务实际上，这是任务，

编写一个函数，将两个数字列表的列表 作为输入。该函数的结果应该是一个列表，其元素是这两个子列表的元素之和。例如：((1 3 2)(4 6 3)) ==> (5 9 5)

它需要在不使用循环、泛函和赋值函数的情况下完成。我不知道该怎么写，这样他就可以同时查看两个子数组并成对组合元素。

请写。

我没有像往常一样

алгоритм

1 个回答

  1. Best Answer

    算法很简单：

    1. 如果其中一个列表为空，则返回第二个列表

    2. 否则

      1. 取出列表的头部并将它们相加
      2. 使用列表尾部递归调用函数
      3. 返回一个新列表，其中总和作为头部，递归调用的结果作为尾部。

    例如：

    (defun  zip (a b)
    (cond
        ((NULL a) b)
        ((NULL b) a)
        (T (cons (+ (car a) (car b)) (zip (cdr a) (cdr b))))
    )
)
    • 1

相关问题