RosettaCodeData/Task/Loops-While/Run-BASIC/loops-while.run

7 lines
59 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
i = 1024
while i > 0
print i
2013-04-10 22:43:41 -07:00
i = int(i / 2)
2013-04-10 21:29:02 -07:00
wend
2013-04-10 22:43:41 -07:00
end