lisp 进制转换编码

lisp怎么写一个十进制转换成二进制的函数 怎么写一个二进制转换成十进制的函数

不会是rui的作业吧