RosettaCodeData/Task/Loops-Do-while/Fortress/loops-do-while.fortress
2018-06-22 20:57:24 +00:00

15 lines
210 B
Text

component loops_do_while
export Executable
var x:ZZ32 = 0
run() = label loop
while true do
x += 1
println(x)
if (x MOD 6) = 0
then exit loop
end
end
end loop
end