6 lines
64 B
Text
6 lines
64 B
Text
|
$n = 1024
|
||
|
|
while ($n > 0)
|
||
|
|
println $n
|
||
|
|
$n = $n/2
|
||
|
|
end while
|