main=interact$(""&).read
x&y=do z+1<-[y];n<-"123";x++n:'\n':("   "++x++n:".")&z