Cod sursa(job #1934669)

Utilizator stelian2000Stelian Chichirim stelian2000 Data 21 martie 2017 18:33:52
Problema Medie Scor 60
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.61 kb
#include <cstdio>

using namespace std;

int v[9010],vaz[7010];

int main()
{
    freopen("medie.in","r",stdin);
    freopen("medie.out","w",stdout);
    int n;
    long long sol=0;
    scanf("%d",&n);
    for(int i=1;i<=n;i++) {scanf("%d",&v[i]);vaz[v[i]]++;}
    for(int i=1;i<n;i++)
        for(int j=i+1;j<=n;j++)
        if((v[i]+v[j])%2==0)
        {
            int c=(v[i]+v[j])/2;
            if(vaz[c]>0)
            {
                sol+=vaz[c];
                if(c==v[i]) sol--;
                if(c==v[j]) sol--;
            }
        }
    printf("%lld",sol);
    return 0;
}