var a:array[1..100,1..100] of integer;
f,g:text;
i,j,n,min:integer;
s:longint;
begin
assign(f,'cc.in');reset(f);
assign(g,'cc.out');rewrite(g);
read(f,n);
s:=0;
for i:=1 to n do
  for j:=1 to n do
    read(f,a[i,j]);
for i:=1 to n do begin
  min:=maxint;
  for j:=1 to n do
    if min>a[i,j] then
       min:=a[i,j];
s:=s+min;
end;
writeln(g,s);
close(g);
end.