($a,$_)=<>;s/./$b.=$&.$"x($c=$a-2).$&;$&x$a/ge;print$_,"$b
"x$c,$_