var a,i,index,min1: integer;
m:array [1..1000] of integer;
begin
read(a);
for i:=1 to a do read(m[i]);
index:=random(1,a);
min1:=m[index];
for i:=1 to a-1 do begin
inc(index); if (index=a+1) then dec(index,a); min1:=min(min1,m[index]);
end;
write(min1);
end.