for(i,n:="
"at(Date second&3),1,-1,writeln(if(n>x:=if(i%n<2,n,i)," ","Z")repeated(x-1),"Z"))