program mire; var n,m,x,i,j,k,l:integer; a:array[1..100,1..100] of integer; begin read(n,m,x); readln; for i:=1 to n do begin for j:=1 to m do read(a[i,j]); readln; end; for i:=1 to n do begin for l:=1 to x do begin for j:=1 to n do for k:=1 to x do write(a[i,j],' '); writeln; end; end; end.