Cod sursa(job #3257533)

Utilizator Luca_georgescuLucageorgescu Luca_georgescu Data 18 noiembrie 2024 11:24:56
Problema Pairs Scor 20
Compilator cpp-64 Status done
Runda cex_3 Marime 0.5 kb
#include <bits/stdc++.h>

using namespace std;

ifstream f("pairs.in");
ofstream g("pairs.out");

int n,a[100005],nr;

int cmmdc(int n, int m)
{
    while ( m )
    {
        int r=n%m;
        n=m;
        m=r;
    }
    return n;
}

int main()
{
    f >> n;
    for (int i=1; i<=n; i++ )
        f >> a[i];
    sort(a+1,a+n+1);
    for (int i=1; i<n; i++ )
        for (int j=i+1; j<=n; j++ )
           if ( cmmdc(a[i],a[j])==1 )
              nr++;
    g << nr;
    return 0;
}