#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];

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

    for(int i = 1; i <= N; ++i)
    {
        in >> Vect[i];
        ++Freq[Vect[i]];
    }

    int Result = 0;
    for(int i = 1; i <= N; ++i)
    {
        for(int j = 0; j < Vect[i]; ++j)
            Result += Freq[j] * Freq[2 * Vect[i] - j];
        Result += (Freq[Vect[i]]-2) * (Freq[Vect[i]]-1) / 2;
    }

    out << Result;

    return 0;
}