Program rf;
 var a,b:array [1..100,1..100] of longint;
     b1,b2:array [1..1 shl 15] of char;
     i,j,k,n:longint;
     fi,fo:text;
begin
 assign(fi,'royfloyd.in');
  assign(fo,'royfloyd.out');
 settextbuf(fi,b1); settextbuf(fo,b2);
 reset(fi); rewrite(fo);
 readln(fi,n);
  for i:=1 to n do begin
   for j:=1 to n do read(fi,a[i,j]);
    readln(fi);
     end;
  for k:=1 to n do
   for i:=1 to n do
    for j:=1 to n do
     if a[i,j]>a[i,k]+a[k,j] then a[i,j]:=a[i,k]+a[k,j];
  for i:=1 to n do begin
   for j:=1 to n do  write(fo,a[i,j],' ');
    writeln(fo);
     end;
 close(fo);
end.