Cod sursa(job #135597)
Utilizator | Data | 13 februarie 2008 23:17:02 | |
---|---|---|---|
Problema | Pairs | Scor | 20 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.63 kb |
#include<fstream>
#include<cstdlib>
#include<cstdio>
using namespace std;
int cmdc(long long a,long long b)
{ long long r;
while(a)
{r=b%a;b=a;a=r;
}
return b;
}
int main(int argc,char *argv[])
{
long long v[100001];
register long i,j,n,k=0;
ifstream f("pairs.in");
ofstream o("pairs.out");
f>>n;
for(i=0;i<n;i++)f>>v[i];;
f.close();
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(cmdc(v[i],v[j])==1)k++;
o<<k<<"\n";
o.close();
return 0;}