Cod sursa(job #2108854)

Utilizator RaduNRadu Negovan RaduN Data 18 ianuarie 2018 21:17:59
Problema Pairs Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <bits/stdc++.h>
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
int v[1000000];
int cmmdc(int a, int b)
{
    int r;
    while(b)
    {
        r=a%b;
        a=b;
        b=r;
    }
    return a;
}
int main()
{
    int n, cont=0;
    f>>n;
    for (int i=0; i<n; i++){
        f>>v[i];
    }
    for (int i=0; i<n; i++){
        for (int j=i+1; j<n; j++){
            if (cmmdc(v[i], v[j])==1){
                cont++;
            }
        }
    }
    g<<cont;
    return 0;
}