var

a:array[0..15]of longint;
b:array[0..15]of longint;
c,d,e,i:longint;

begin
d:=8;
e:=0;
for i:=1 to 7 do
begin
    c:=0;
    read(a[i],b[i]);
    c:=a[i]+b[i];
    if c>d then
        begin
        d:=c;
        e:=i;
        end
end;
write(e);
end.