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

6 lines
50 B
Plaintext

i = 1024
while i > 0
print i
i = i / 2
wend