procedure main()
local i
i := 0
repeat {
writes(i, " ")
i +:= 1
if i >= 10 then break
}
write()
end
cHJvY2VkdXJlIG1haW4oKQogICBsb2NhbCBpCiAgIGkgOj0gMAogICByZXBlYXQgewogICAgICB3cml0ZXMoaSwgIiAiKQogICAgICBpICs6PSAxCiAgICAgIGlmIGkgPj0gMTAgdGhlbiBicmVhawogICB9CiAgIHdyaXRlKCkKZW5k