lisp吧 关注:2,681贴子:12,837
  • 2回复贴,共1

Lisp的一些题目,求教

只看楼主收藏回复

1.编写一个LISP函数int-to-binary,将给定的非负整数转换为使用0和1表示二进制数的列表。
例如:
(int-to-binary 0) 返回 (0)
(int-to-binary 1) 返回(1)
(int-to-binary 2) 返回 (1 0)
(int-to-binary 13) 返回 (1 1 0 1)
提示: 你可以考虑使用LISP函数floor结合/、rem来解决这个问题。
2. 编写一个LISP函数my-member,如果第一个参数存在于第二个参数中,那么返回T,否则返回NIL。
以下是一些例子:
(my-member ’a ’()) 返回 NIL
(my-member ’a ’(c b a)) 返回 T
(my-member ’a ’(c b (a))) 返回 NIL (因为a不是列表的元素,而是包含a的列表。)
3. 这是练习2的延伸。编写一个新的LISP函数deep-member,如果给定的参数是给定列表的元素,或者在它的任何子列表中,则返回T,否则返回NIL。
以下是一些例子:
(deep-member ’a ’()) 返回 NIL
(deep-member ’a ’(c b a)) 返回 T
(deep-member ’a ’(c b (a))) 返回 T
(deep-member ’a ’(c b (1 (a)))) 返回 T
(deep-member ’a ’(c b (1 (d)))) 返回 NIL


IP属地:广东1楼2019-12-04 00:10回复
    LZUer + 1


    IP属地:福建来自Android客户端2楼2019-12-04 15:34
    回复
      是学长吧,好熟悉的题目


      IP属地:甘肃3楼2020-12-08 15:34
      回复