RosettaCodeData/Task/Loops-While/BASIC256/loops-while.basic

9 lines
57 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
i = 1024
while i > 0
print i
i = i \ 2
end while
end