Cod sursa(job #994816)

Utilizator rares96cheseliRares Cheseli rares96cheseli Data 6 septembrie 2013 13:45:38
Problema Medie Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
#include <fstream>
using namespace std;
ifstream f("medie.in");
ofstream g("medie.out");

int n, a[9005], fcv[70005], sol;

int main()
{
    f>>n;
    for (int i=1; i<=n; ++i) f>>a[i], ++fcv[a[i]];

    for (int i=1; i<n; ++i)
        for (int j=i+1; j<=n; ++j)
        {
            int aux=a[i]+a[j];
            if (aux%2==0 && fcv[aux/2]) ++sol;
        }
    g<<sol<<"\n";
    return 0;
}