Cod sursa(job #2731034)

Utilizator Giulian617Buzatu Giulian Giulian617 Data 27 martie 2021 11:17:33
Problema Pairs Scor 20
Compilator cpp-64 Status done
Runda simulare_oni_cex Marime 0.46 kb
#include <bits/stdc++.h>
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
int n,ans,v[100005];
int cmmdc(int a,int b)
{
    while(b)
    {
        int r=a%b;
        a=b;
        b=r;
    }
    return a;
}
int main()
{
    f>>n;
    for(int i=1; i<=n; i++)
        f>>v[i];
    for(int i=1;i<n;i++)
        for(int j=i+1;j<=n;j++)
            if(cmmdc(v[i],v[j])==1)
                ans++;
    g<<ans;
    return 0;
}