Pagini recente » Borderou de evaluare (job #3302934) | Borderou de evaluare (job #2465189) | Borderou de evaluare (job #3302937) | Monitorul de evaluare | Cod sursa (job #2426718)
#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;
}