Pagini recente » Cod sursa (job #913023) | Borderou de evaluare (job #1587777) | Cod sursa (job #591494) | Cod sursa (job #3161991) | Cod sursa (job #568440)
Cod sursa(job #568440)
#include<fstream>
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
int cmmdc(int a,int b)
{if(a==b) return a;
else if(a>b) return cmmdc(a-b,b);
else return cmmdc(a,b-a);
}
int main()
{long long v[100000],n,s=0;
int i,j;
f>>n;
i=1; while(i<=n)
{f>>v[i];
for(j=i+1;j<=n;j++)
{f>>v[j]; if(v[i]!=v[j] && cmmdc(v[i],v[j])==1) {s++;} }
i++;}
g<<s;
}