#include <cstdio>

using namespace std;

int v[9010],vaz[7010];

int main()
{
    freopen("medie.in","r",stdin);
    freopen("medie.out","w",stdout);
    int n;
    long long sol=0;
    scanf("%d",&n);
    for(int i=1;i<=n;i++) {scanf("%d",&v[i]);vaz[v[i]]++;}
    for(int i=1;i<n;i++)
        for(int j=i+1;j<=n;j++)
        if((v[i]+v[j])%2==0)
        {
                sol+=vaz[(v[i]+v[j])/2];
                if(v[i]==v[j]) sol-=2;
        }
    printf("%lld",sol);
    return 0;
}