10 lines
130 B
Text
10 lines
130 B
Text
|
component loops_while
|
||
|
|
export Executable
|
||
|
|
|
||
|
|
var i:ZZ32 = 1024
|
||
|
|
run() = while i > 0 do
|
||
|
|
println(i)
|
||
|
|
i := i DIV 2
|
||
|
|
end
|
||
|
|
end
|