布尔运算

aimisiyou · 发表于 2020-4-21 17:22:06

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

本帖最后由 aimisiyou 于 2020-4-21 18:57 编辑

1、判断两个正整数表是否相同？如lst1={7 5 3 1},lst2={3 5 7 1}.
   (apply 'boole (cons 6 (append lst1 lst2)))
   返回值为0则两表相等，否则不相等。
_$ (apply 'boole (cons 6 (append '(1 3 5) '( 5 3 1))))
0
_$  (apply 'boole (cons 6 (append '(-1 3 5 7) '( 5 3 -1 7))))
0

2、找出整数表中唯一不配对的元素。如lst1={1 1 3 3  5  7 7 }，lst2='(-1 -1 3 3 5 5 7 7 -9)
(apply 'boole (cons 6  lst))
_$ (apply 'boole (cons 6  '(1 1 3 3 5 7 7)))
5
_$  (apply 'boole (cons 6  '(-1 -1 3 3 5 5 7 7 -9)))
-9

3、判断一个数是否为奇数，(boole 1 1 num)。
_$ (boole 1 1 7)
1

账号		自动登录	找回密码
密码			立即注册

[研讨] 布尔运算

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。