Cod sursa(job #2177967)

Utilizator PopeangaMihneaPopeanga Mihnea- Stefan PopeangaMihnea Data 18 martie 2018 22:25:56
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.6 kb
#include <bits/stdc++.h>

using namespace std;

int n;
int x[9001];
int ap[70001], frecv[70001];

int main()
{
    freopen("medie.in", "r", stdin);
    freopen("medie.out", "w", stdout);
    scanf("%d", &n);
    for(int i=1; i<=n; ++i) scanf("%d", &x[i]);
    for(int i=1; i<=n; ++i)
    {
        ++ap[x[i]];
        for(int j=i+1; j<=n; ++j)
        {
            int val=(x[i]+x[j])/2;
            if(val*2==x[i]+x[j]) ++frecv[val];
        }
    }
    int sol=0;
    for(int i=1; i<=n; ++i) if(frecv[x[i]]) sol=sol+frecv[x[i]]-ap[x[i]]+1;
    printf("%d", sol);
    return 0;
}