RosettaCodeData/Task/Loops-While/Lingo/loops-while.lingo
2016-12-05 23:44:36 +01:00

5 lines
111 B
Text

n = 1024
repeat while n>0
put n
n = n/2 -- integer division implicitely returns floor: 1/2 -> 0
end repeat