Cod sursa(job #2521429)

Utilizator BogauuuBogdan Ivancu Bogauuu Data 10 ianuarie 2020 20:43:16
Problema Medie Scor 60
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <fstream>

using namespace std;

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

int i,j,n,m,af,c,a[9005],v[9005];

int main()
{
    fin >> n;
    for (i=1;i<=n;i++)
    {
        fin >> a[i];
        v[a[i]]++;
    }
    for (i=1;i<=n;i++)
    {
        for (j=i+1;j<=n;j++) if ((a[i]+a[j])%2==0)
        {
            m=(a[i]+a[j])/2;
            c=v[m];
            if (a[i]==m) c--;
            if (a[j]==m) c--;
            if (c>0) af+=c;
        }
    }
    fout << af;

    return 0;
}