Program M_MULTIPLY; var i, j, k, Ia, Ja, Jb: integer; a, b, c: array [ 1..100, 1..100 ] of integer; begin readln( Ia ); readln( Ja ); readln( Jb ); for i:= 1 to Ia do begin for j:= 1 to Ja do read( a[ i, j ]); readln; end; for i:= 1 to Ja do begin for j:= 1 to Jb do read( b[ i, j ]); readln; end; for i:= 1 to Ia do for j:= 1 to Jb do for k:= 1 to Ja do c[ i, j ]:= c[ i, j ] + a[ i, k ] * b[ k, i ]; for i:= 1 to Ia do begin for j:= 1 to Jb do write( c[ i, j ]); writeln; end; for i:= 1 to Ia do begin for j:= 1 to Ja do write( a[ i, j ]); writeln; end; end.