#include<bits/stdc++.h>

using namespace std;
constexpr int M=3e5+5;long long ans,cnt;
int n,block,len,p[M],a[M],buc[M<<1];
int read(){
    int x=0;char ch=getchar();
    while (!isdigit(ch)) ch=getchar();
    while (isdigit(ch)) x=x*10+ch-48,ch=getchar();
    return x;
}
double fun(double p,double eps){
    return min(1e9,fabs(p-0.5)<1e-9?1e9:log(eps)/(log(2)+log(p)/2+log(1-p)/2));
} mt19937 mt(time(NULL));
int main(){ n=read();
    for (int i=1;i<=n;i++) p[i]=read();
    for (int i=1;i<=n;i++){
        len=fun(1.*p[i]/n,1e-6);
        int l=max(1,i-len),r=min(n,i+len); a[l-1]=r-l+1;
        for (int k=l;k<=r;k++) a[k]=a[k-1]+(p[k]>p[i]?1:-1);
			#pragma GCC unroll 8
        for (int k=l;k<=i;k++) buc[a[k-1]]++; long long sum=0;
			#pragma GCC unroll 8
        for (int k=i;k<=r;k++) sum+=buc[a[k]]+buc[a[k]+1];
        ans+=1ll*p[i]*sum;cnt+=sum;
			#pragma GCC unroll 8
        for (int k=l;k<=i;k++) buc[a[k-1]]=0;
    }
    printf("%lld\n",ans);
    return 0;
}