#include<bits/stdc++.h>
using namespace std;
ifstream F("nrtri.in");
ofstream G("nrtri.out");
int n,a[800],i,j,b[30000];
long long k;
int main()
{
    for(F>>n;i<n;F>>a[i++]);
    for(sort(a,a+n),i=1;i<=a[n-1]-a[0];++j)
        for(;a[j]>=i;b[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;
}