$f=<>;map{s/ *$//;$i++>0||s/#/ /&& s/#$/##/;print}(map{$_ x$f."\n"}("# #", " # ", "# "))[0..2,2,2,1,0];