(format t "~b" 5) ; or (write 5 :base 2)