Cod sursa(job #274362)
Utilizator | Data | 9 martie 2009 17:33:26 | |
---|---|---|---|
Problema | Pairs | Scor | 20 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.38 kb |
#include<fstream.h>
int n,nr;
long int v[100001];
ifstream fin("pairs.in");
ofstream fout("pairs.out");
int gcd(int a, int b)
{
if (!b) return a;
return gcd(b, a % b);
}
int main()
{
int i,j;
fin>>n;
for(i=1;i<=n;i++)
fin>>v[i];
for(i=1;i<=n;i++)
for(j=i;j<=n;j++)
if(gcd(v[i],v[j])==1)
nr++;
fout<<nr<<"\n";
return 0;
}