RosettaCodeData/Task/Loops-While/Lingo/loops-while.lingo

6 lines
111 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
n = 1024
repeat while n>0
put n
n = n/2 -- integer division implicitely returns floor: 1/2 -> 0
end repeat