Cod sursa(job #2426718)

Utilizator SergiuS3003Sergiu Stancu Nicolae SergiuS3003 Data 29 mai 2019 09:50:41
Problema Pairs Scor 20
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.49 kb
#include <iostream>
#include <fstream>
using namespace std;
  ifstream f("pairs.in");
  ofstream g("pairs.out");
int cmmdc(int a,int b)
{
    while(b!=0)
    {
        int r=a%b;
        a=b;
        b=r;
    }
    return a;
}
int v[100001];
int main()
{
    int n,nrp=0;
    f>>n;
    f>>v[1];
    for(int i=2;i<=n;i++)
    {
        f>>v[i];
        for(int j=i-1;j>=1;j--)
            if(cmmdc(v[i],v[j])==1)
               nrp++;
    }
    g<<nrp;
    return 0;
}