Cod sursa(job #545903)

Utilizator mateiuliIulian mateiuli Data 4 martie 2011 08:48:15
Problema Pairs Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.62 kb
#include <stdio.h>
#include <iostream.h>
int n,m[100000];

int cmmdc(int a, int b) {
	int r;
	r = a % b;
        while(r != 0)
        {
           a = b;
           b = r;
           r = a % b;
        }

	return b;
}

int main() {
	//FILE *fin = fopen("pairs.in", "r"); 
	freopen("pairs.in", "r", stdin);
	//fscanf(fin, "%d", &n);
	//n = 5;
	scanf("%d", &n);
	int nr=0;
	for(int i=1; i<=n; i++) 
		scanf("%d", &m[i]);
		//fscanf(fin, "%d", &m[i]);
	int i, j;
	for(i=1; i<=n; i++)
		for(j=i+1; j<=n; j++)
			if(cmmdc(m[i], m[j]) == 1)
				nr++;
	freopen("pairs.out", "w", stdout);
	printf("%d", nr);
}