Cod sursa(job #2501222)

Utilizator ardutgamerAndrei Bancila ardutgamer Data 29 noiembrie 2019 11:30:07
Problema Pairs Scor 20
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.57 kb
#include <cstdio>

using namespace std;

int cmmdc(int a,int b)
{
    int r;
    while(b)
    {
        r = a % b;
        a = b;
        b = r;
    }
    return a;
}

int v[100005];

int main()
{
    freopen("pairs.in","r",stdin);
    freopen("pairs.out","w",stdout);
    int n;
    scanf("%d",&n);
    for(int i = 1 ; i <= n ; i++)
        scanf("%d",&v[i]);
    int cnt = 0;
    for(int i = 1 ; i < n ; i++)
        for(int j = i+1; j <= n ; j++)
            if(cmmdc(v[i],v[j]) == 1)
                cnt++;
    printf("%d\n",cnt);
    return 0;
}