9 lines
130 B
Text
9 lines
130 B
Text
procedure main()
|
|
every writes(x := 1 to 10) do {
|
|
if x % 5 = 0 then {
|
|
write()
|
|
next
|
|
}
|
|
writes(", ")
|
|
}
|
|
end
|