RosettaCodeData/Task/Loops-While/BaCon/loops-while.bacon
2023-07-01 13:44:08 -04:00

5 lines
50 B
Text

i = 1024
WHILE i > 0
PRINT i
i = i / 2
WEND