#include <fstream>
using namespace std;

#define FILE_NAME "medie"
ifstream in (FILE_NAME".in");
ofstream out(FILE_NAME".out");

constexpr int MAX_VAL = 7000 + 4;
constexpr int MAX_DIM = 9000 + 4;
int Vect[MAX_DIM], Freq[MAX_VAL], Count[MAX_VAL];

int main()
{
    int N;
    in >> N;

    for(int i = 1; i <= N; ++i)
    {
        in >> Vect[i];
        ++Count[Vect[i]];
        for(int j = 1; j < i; ++j)
            if(Vect[i] % 2 == Vect[j] % 2)
                ++Freq[(Vect[i] + Vect[j])>>1];
    }

    int Result = 0;
    for(int i = 1; i <= N; ++i)
        Result += Freq[Vect[i]] - Count[Vect[i]] + 1;

    out << Result;

    return 0;
}