procedure main() every(n:=1)+:=1to 400&(s:=0)||:=" "||repl(":",!n)|write(s[3:0]) end