5 lines
76 B
Scheme
5 lines
76 B
Scheme
|
(do ((n 1024 (quotient n 2)))
|
||
|
|
((<= n 0))
|
||
|
|
(display n)
|
||
|
|
(newline))
|