Cod sursa(job #235856)

Utilizator drag0s93Mandu Dragos drag0s93 Data 26 decembrie 2008 00:56:38
Problema Pairs Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.54 kb
#include<stdio.h>
int n,x,y,v[100000];
void citire()
{
	for(int i=0;i<=n;++i)
		scanf("%d",&v[i]);
}
int cmmdc()
{
	int r=0;
	if(x<y && x!=y)
	{
		r=x;
		x=y;
		y=r;
	}
	while(x%y && x!=y)
	{
		r=x%y;
		x=y;
		y=r;
	}
	return r;
}
int main()
{
	int perechi=0,p=0,i=0;
	freopen("pairs.in","r",stdin);
	freopen("pairs.out","w",stdout);
	scanf("%d",&n);
	citire();
	for(i=0;i<=n;++i)
	{
		for(p=i;p<n;++p)
		{
			x=v[i];
			y=v[p];
			if(cmmdc()==1)
				++perechi;
		}
		
	}
	printf("%d",perechi);
	return 0;
}