9 lines
88 B
Text
9 lines
88 B
Text
|
procedure main()
|
||
|
|
|
||
|
|
i := 0
|
||
|
|
repeat {
|
||
|
|
write(i +:= 1)
|
||
|
|
if i % 6 = 0 then break
|
||
|
|
}
|
||
|
|
end
|