#include <bits/stdc++.h>
#define ll long long
using namespace std;
ifstream fin("medie.in");
ofstream fout("medie.out");
ll n, rez, minim = 7005, v[9005], fv[7005];

ll fact(ll nr) {
    ll val = 1;
    for (ll i = 2; i <= nr; ++i)
        val *= i;
    return val;
}

int main() {
    fin >> n;
    for (int i = 1; i <= n; ++i) {
        fin >> v[i];
        minim = min(minim, v[i]);
        ++fv[v[i]];
    }
    for (int i = 1; i <= n; ++i) {
        if (fv[v[i]] > 2)
            rez += fact(fv[v[i]] - 2);
        for (ll st = v[i] - 1, dr = v[i] + 1; st >= 1; --st, ++dr)
            rez += fv[st] * fv[dr];
    }
    fout << rez;
    return 0;
}