main=mapM putStrLn[tail$s>>=f.show.(y*)|y<-s]
f n=([length n..3]>>" ")++n
s=[1..12]