($R,$K)=glob<>;
($H,$W)=glob<>;
@_=map[/./g],<>;
if($R==0){
	for$y(0..$H-1){
		for(1..$K){
			for$x(0..$W-1){
				print$_[$y][$x]x$K
			}
			print$/
		}
	}
}elsif($R==90){die;
}elsif($R==180){die;
}else{die;
}