RosettaCodeData/Task/Loops-While/Liberty-BASIC/loops-while.basic

7 lines
60 B
Plaintext

i = 1024
while i > 0
print i
i = int( i / 2)
wend
end