Pagini recente » Cod sursa (job #585870) | Cod sursa (job #2834016) | Cod sursa (job #1548678) | Cod sursa (job #1151893) | Cod sursa (job #109529)
Cod sursa(job #109529)
#include <fstream.h>
long a[10001],n;
long cmmdc(long x,long y)
{ long r=x%y;
while (r!=0)
{ x=y;
y=r;
r=x%y;
}
return y;
}
int main()
{ long i,j;
long long nr=0;
ifstream f("pairs.in");
f>>n;
for (i=1;i<=n;i++)
f>>a[i];
f.close();
for (i=1;i<n;i++)
for (j=i+1;j<=n;j++)
if (cmmdc(a[i],a[j])==1)
{ nr++;
}
ofstream g("pairs.out");
g<<nr;
return 0;
}