program pvz5;

   var i, j, suma: integer;
       lent: array[1..3, 1..3] of integer;

begin

   writeln('veskte 9 sveikus skai?ius');
   for i := 1 to 3 do
      for j := 1 to 3 do
         read(lent[i,j]);

   for i := 1 to 3 do begin
      suma := 0;
      for j := 1 to 3 do begin
         write(lent[i,j]:5);
         suma := suma + lent[i,j];
      end;
      writeln(' =', suma:5);
   end;

   writeln('    =    =    =');

   for j := 1 to 3 do begin
      suma := 0;
      for i := 1 to 3 do suma := suma + lent[i,j];
      write(suma:5);
   end;
   writeln;

end.