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