Cod sursa(job #1344938)

Utilizator fluture.godlikeGafton Mihnea Alexandru fluture.godlike Data 17 februarie 2015 09:02:46
Problema Pairs Scor 20
Compilator cpp Status done
Runda prega_rav_1 Marime 0.54 kb
#include <stdio.h>
#define lim 1000023LL
#define NMAX 100023LL
#define i64 long long int
FILE *fin, *fout;
i64 count;
int n, v[NMAX];
int gcd(int a, int b)
{
	if(a == 0) return b;
	return gcd(b%a, a);
}
int main()
{
	fin = freopen("pairs.in", "r", stdin);
	fout = freopen("pairs.out", "w", stdout);
	scanf("%d", &n);
	for(int i = 0; i< n; i++)
	{
		scanf("%d", &v[i]);
	}
	for(int i = 0; i< n; i++)
	{
		for(i64 j = i+1; j< n; j++)
		{
			if(gcd(v[i], v[j]) == 1) count++;
		}
	}
	printf("%lld\n", count);
	fclose(fin);
	fclose(fout);
	return 0;
}