{int@n,@a[n],b,c;rep(i,n)a[i]&&b+=c,!a[i]&&b+=(c=i+1);wt(b);}