uses crt;
var
a:array[1..100,1..100] of integer;
i,j,k,n,max,m:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
for k:=1 to k do
read(a[i,k]);
writeln;
max:=a[n,2]; m:=1;

for i:=n downto 2 do begin
m:=m+1;
for k:= m to n do
if a[i,k]> max then max:=a[i,k];
end;
writeln(max);
end.