5 lines
192 B
Text
5 lines
192 B
Text
procedure main()
|
|
every writes(center("police"|"sanitation"|"fire",12)|"\n")
|
|
every ((p:=2|4|6)~=(s := 1 to 7)~=(f := 1 to 7),p+s+f=12) do
|
|
every writes(center(p|s|f,12)|"\n")
|
|
end
|