RosettaCodeData/Task/Loops-While/Hexiscript/loops-while.hexi

6 lines
60 B
Plaintext

let i 1024
while i > 0
println i
let i (i / 2)
endwhile