Cod sursa(job #930840)

Utilizator Ionut228Ionut Calofir Ionut228 Data 27 martie 2013 20:50:23
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.68 kb
#include <fstream>

using namespace std;

ifstream fin("medie.in");
ofstream fout("medie.out");

int n, sum;
int v[9002], a[7002], w[9002];

int main()
{
    fin >> n;
    for (int i = 1; i <= n; ++i)
    {
        fin >> v[i];
        ++a[v[i]];
    }
    for (int i = 1; i <= n; ++i)
    {
        for (int j = i + 1; j <= n; ++j)
        {
            if (((v[i] + v[j]) >> 1) == ((v[i] + v[j] + 1) >> 1))
                ++w[(v[i] + v[j]) >> 1];
        }
    }
    sum = 0;
    for (int i = 1; i <= n; ++i)
    {
        if (w[v[i]] != 0)
            sum += w[v[i]] - a[v[i]] + 1;
    }
    fout << sum;
    fin.close();
    fout.close();
    return 0;
}