fork download 
  1. (defun check (n)
  2.   (format t "~d~%" n)
  3.   (format t "~b~%~%" n))
  4.  
  5. (check 0)
  6. (check 1)
  7. (check most-positive-fixnum)
Success #stdin #stdout 0.02s 10584KB
comments (?)
stdin 
Standard input is empty
stdout 
0
0

1
1

16777215
111111111111111111111111
https://ideone.com/QnFn0t
language:
Common Lisp (clisp 2.49.92)
created:
10 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!