Cod sursa(job #1151785)
| Utilizator | Data | 24 martie 2014 12:55:30 | |
|---|---|---|---|
| Problema | Pairs | Scor | 20 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.51 kb |
#include <fstream>
using namespace std;
ifstream x ("pairs.in");
ofstream y ("pairs.out");
int n,i,j,a,b,v[100001],nr;
void read()
{x>>n;
for(i=1;i<=n;i++)
x>>v[i];
}
void cmmdc()
{while(a!=b)
if(a>b) a=a-b;
else b=b-a;
}
void pairs()
{for(i=1;i<n;i++)
for(j=i+1;j<=n;j++)
{a=v[i];
b=v[j];
cmmdc();
if(a==1) nr++;
}
y<<nr<<'\n';
}
int main()
{read();
pairs();
return 0;
}
