program pr_13;

const
  N = 9;

type
  mas = array[1..N, 1..N] of integer;

var
  x: mas;
  i, j: integer;
  s1, s2: real;
  f: boolean;

begin
  randomize;
  for i := 1 to N do
    for j := 1 to N do
      read(x[i, j]);

  for i := 1 to N do begin
    for j := 1 to N do
      write(x[i, j], ' ');
    writeln;
  end;

  f := true;
  s1 := 0;
  for i := 1 to N do
    s1 := s1 + x[1, i];
  for i := 2 to N do begin
    s2 := 0;
    for j := 1 to N do
      s2 := s2 + x[i, j];
    if s1 <> s2 then
      f := false;
  end;

  for j := 1 to N do begin
    s2 := 0;
    for i := 1 to N do
      s2 := s2 + x[i, j];
    if s1 <> s2 then
      f := false;
  end;

  if f then
    writeln('Магический квадрат.')
  else
    writeln('Не магический квадрат.');

end.