sub w{print'M('x$i.~~$_.')'x$i.$/;$i--;$_>1e2?$_-=10:($i+=2,w(w($_+=11)))}$i=1,w,print 91for<>