Program M_POWER;
 var a, b, c, b1, c1: array[ 1..100, 1..100 ] of integer;
     Ia, i, j, k, n: integer;
begin
 readln( Ia );     					{ Количество строк }
 for i:= 1 to Ia do
  begin 
   for j:= 1 to Ia do
    read( a[ i, j ] );
   readln;
  end;            					{ Сама матрица }
 readln( n );						{ Степень } 
 
 for i:= 1 to Ia do
  for j:= 1 to Ia do
   c[ i, j ]:= a[ i, j ];				{C = A }
 for i:= 1 to Ia do
  for j:= 1 to Ia do
   if i = j then
    b[ i, j ]:= 1
   else b[ i, j ]:= 0;					{ B - еденичная матрица }
  
  while n <> 0 do
   if n mod 2 = 0 then
    begin
     n:= n div 2;
     for i:= 1 to Ia do
      for j:= 1 to Ia do
       for k:= 1 to Ia do
        c1[ i, j ]:= c1[ i, j ] + c[ i, k ] * c[ k, j ];
     for i:= 1 to Ia do
      for j:= 1 to Ia do
       begin
        c[ i, j ]:= c1[ i, j ];
        c1[ i, j ]:= 0;
       end;
    end
   else
    begin
     n:= n - 1;
     for i:= 1 to Ia do
      for j:= 1 to Ia do
       for k:= 1 to Ia do
        b1[ i, j ]:= b1[ i, j ] + b[ i, k ] * c[ k, j ];
     for i:= 1 to Ia do
      for j:= 1 to Ia do
       begin
        b[ i, j ]:= b1[ i, j ];
        b1[ i, j ]:= 0;
       end;
    end;
  for i:= 1 to Ia do
   begin
    for j:= 1 to Ia do       
     write( b[ i, j ], ' ' );
    writeln;
   end;
end.