#include <fstream>
#define l 9005
using namespace std;
ifstream f("medie.in");
ofstream g("medie.out");
int  i,n,a[l],fr[2*l],j,rez;
int main()
{
        f>>n;
        for(i=1; i<=n; i++) {
                f>>a[i];
                fr[a[i]]++;
        }
 
        for(i=1; i<=n; i++)
                for(j=i+1; j<=n; j++)
 
                        if ((a[i]+a[j])%2==0) {
                          fr[a[i]]--,fr[a[j]]--;
                          rez+=fr[(a[i]+a[j])/2];
                          fr[a[i]]++,fr[a[j]]++;
                        }
        g<<rez;
 
 
        f.close();
        g.close();
        return 0;
}