var f:text;
    a,c:array[1..100,1..100] of integer;
    i,j,k,n:integer;
begin
     assign(f,'royfloyd.in'); reset(f);
     readln(f,n);
     for i:=1 to n do
     begin
          for j:=1 to n do read(f,a[i,j]);
          readln(f);
     end;
     c:=a;
     for i:=1 to n do
          for j:=1 to n do
               if c[i,j]=0 then c[i,j]:=maxint-2000;
     for k:=1 to n do
          for i:=1 to n do
               for j:=1 to n do
                    if i<>j then
                    if c[i,k]+c[k,j]<c[i,j] then c[i,j]:=c[i,k]+c[k,j];
     close(f); assign(f,'royfloyd.out'); rewrite(f);
     for i:=1 to n do
     begin
          for j:=1 to n do
               if c[i,j]=maxint-2000 then write(f,'0 ')
                                     else write(f,c[i,j],' ');
          writeln(f);
     end;
     close(f);
end.