#include <fstream>
#include <iostream>

#define MAXN 9005
#define NR 7005

using namespace std;

ifstream f ("medie.in");
ofstream g ("medie.out");

int n;
unsigned long long sol;
int v[MAXN], s[NR];

int main(){
    f >> n;

    for(int i = 1; i <= n; ++i){
        f >> v[i];
        s[v[i]] = 1;
    }
    for(int i = 1; i < n; ++i){
        for(int j = i + 1; j <= n; ++j){
            int k = 2 * v[i] - v[j];
            if(s[k]) sol ++;
        }
    }
    g << sol << '\n';
}