Cod sursa(job #109612)
Utilizator | Avramescu Andrei me_andy | Data | 25 noiembrie 2007 12:05:55 |
---|---|---|---|
Problema | Pairs | Scor | 0 |
Compilator | cpp | Status | done |
Runda | preONI 2008, Runda 1, Clasa a 10-a | Marime | 0.43 kb |
#include<fstream.h>
ifstream f("pairs.in");
ofstream g("pairs.out");
long n,v[100001],i,j,s;
int ver(int a,int b)
{
int c;
while(b)
{
c=a%b;
a=b;
b=c;
}
if(a==1)
return 0;
return 1;
}
int main()
{
f>>n;
for(i=1;i<=n;i++)
f>>v[i];
for(i=1;i<n;i++)
{
for(j=i+1;j<=n;j++)
if(v[i]%2!=0 || v[j]%2!=0)
if(ver(v[i],v[j]))
s++;
}
g<<s;
f.close();
g.close();
return 0;
}