Lisp list-contains程序

Question

如何创建一个Lisp程序来检查字符,字符串或数字是否在列表中？

(list-contains '(1 a 2 d 2 5) 'a) => T

(list-contains '(1 a 2 d 2 5) 'x) => NIL

Answer 1

(find x the-list)如果x在列表中,您可以使用哪个返回x,如果不在,则返回NIL.

(find 'a '(1 a 2 d 2 5)) ; A
(find 'x '(1 a 2 d 2 5)) ; NIL

Answer 2

由于这是家庭作业,您的教授可能希望看到您实施算法.试试这个:

1. 拿出列表中的汽车并将其与输入符号进行比较.
2. 如果它是相同的,返回true; 你完成了.
3. 如果它是空的,则返回false; 你完成了.
4. 使用列表的cdr递回到#1 .(这里暗示汽车不是空的,不是比较符号)