Cod sursa(job #1750168)

Utilizator tziplea_stefanTiplea Stefan tziplea_stefan Data 29 august 2016 17:51:53
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.59 kb
#include <fstream>
#define VAL 9005

using namespace std;

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

int N, M, i;
int mx, v[VAL];
int a[VAL], j;

int main()
{
    fin >> N;
    for (i=1; i<=N; i++)
    {
        fin >> v[i];
        a[v[i]]++;
    }
    for (i=1; i<N; i++)
    {
        for (j=i+1; j<=N; j++)
        {
            M=v[i]+v[j];
            M/=2;
            if (M*2==v[i]+v[j])
            {
                mx+=a[M];
                if (v[i]==M)
                  mx-=2;
            }
        }
    }
    fout << mx << '\n';
    fin.close();
    fout.close();
    return 0;
}