RosettaCodeData/Task/Loops-Do-while/Phix/loops-do-while.phix

7 lines
88 B
Plaintext

integer x = 0
while 1 do
x += 1
?x
if mod(x,6)=0 then exit end if
end while