main=mapM putStrLn[tail$n>>=r.take 4.r.(" "++).show.(i*)|i<-n] r=reverse n=[1..12]