#include<bits/stdc++.h>
using namespace std;
ifstream F("nrtri.in");
ofstream G("nrtri.out");
int i,j,k,n,a[800],b[30001];
int main()
{
    for(F>>n;i<n;F>>a[i++]);
    for(sort(a,a+n),i=a[0]+1;i<=a[n-1]-a[0]+1;b[i++]=j)
        for(;a[j]<i;++j);
    for(i=1;i<n-1;++i)
        for(j=i+1;j<n&&a[j]<2*a[i];k+=i-b[a[j++]-a[i]]);
    return G<<k,0;
}