Pagini recente » Cod sursa (job #899864) | Atasamentele paginii Inception | Cod sursa (job #542009) | Cod sursa (job #2761041) | Cod sursa (job #538842)
Cod sursa(job #538842)
#include<fstream>
using namespace std;
int i,j,n,m,a[100001];
unsigned long nr=0;
int cmmdc(int a,int b)
{
int r;
r=a%b;
while(r)
{
a=b;
b=r;
r=a%b;
}
return b;
}
int main()
{
ifstream f("pairs.in");
ofstream g("pairs.out");
f>>n;
for(i=1;i<=n;i++)
{
f>>a[i];
for(j=1;j<i;j++)
if(cmmdc(a[i],a[j])==1)
nr++;
}
g<<nr;
return 0;
}