5 lines
79 B
Text
5 lines
79 B
Text
put 1024 into n
|
|
repeat while n > 0
|
|
put n & cr
|
|
divide n by 2
|
|
end repeat
|