var a:array[0..1000001] of longint;
    n,x,i,k,mmin:longint;
    t:int64;
    f1,f2:text;
const fi = 'CHIADAY.INP';
      fo = 'CHIADAY.OUT';
begin
    assign(f1,fi);reset(f1);
    assign(f2,fo);rewrite(f2);
    readln(n);
    for i:=1 to n do
        begin
            read(x);
            a[i]:=a[i-1] + x;
        end;
    mmin:=trunc(1e9);
    k:=1;
    for i:=1 to n-1 do
        begin
            t:=abs(a[n] - 2*a[i]);
            if t < mmin then
                begin
                    mmin:=t;
                    k:=i;
                end;
        end;
    writeln(k);
    close(f1);close(f2);
end.

var a:array[0..1000007] of int64;
    n,k,t1,t2,mi,t:int64;
    i:longint;
begin
 readln(n);
mi := maxlongint;
t1 := 0; t2 := 0; t := 0;
for i := 1 to n do
   begin
      read(a[i]);
      t := t+a[i];
   end;
for i := 1 to n do
begin
  t1 := t1 + a[i];
  t2 := t - t1;
  if mi > abs(t1-t2) then
    begin
        mi := abs(t1-t2);
        k := i;
    end;
end;
writeln(k);
readln; readln;
end.