PROGRAM CWINGRAD(INPUT,OUTPUT);
  TYPE AA=ARRAY[1..10,1..10 ]OF INTEGER;
  VAR M,N,Q,I,J:INTEGER;
      A,B,C:AA;

{$I B:WINGRAD.SRC}

  BEGIN
    READLN(M,N,Q);
    FOR I:=1 TO M DO
       FOR J:=1 TO N DO READ(A[I,J]);
    FOR I:=1 TO N DO
       FOR J:=1 TO Q DO READ(B[I,J]);
    WRITELN;
    WRITELN;
    WRITELN('A:');
    FOR I:=1 TO M DO BEGIN
      FOR J:=1 TO N DO WRITE(A[I,J]:4);
      WRITELN
    END;
    WRITELN('B:');
    FOR I:=1 TO N DO BEGIN
      FOR J:=1 TO Q DO WRITE(B[I,J]:4);
      WRITELN
    END;
    WINGRAD(M,N,Q,A,B,C);
    WRITELN;
    WRITE('C=':2);
    FOR I:=1 TO M DO
      BEGIN
      FOR J:=1 TO Q DO
         WRITE(C[I,J]:8);
      WRITELN
      END
  END.