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