RosettaCodeData/Task/Loops-Do-while/Lingo/loops-do-while.lingo

7 lines
80 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
i = 0
repeat while TRUE
i = i+1
put i
if i mod 6 = 0 then exit repeat
end