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

7 lines
80 B
Plaintext

i = 0
repeat while TRUE
i = i+1
put i
if i mod 6 = 0 then exit repeat
end