Cod sursa(job #106452)

Utilizator xtephanFodor Stefan xtephan Data 18 noiembrie 2007 17:20:27
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.67 kb
#include<stdio.h>
#include<math.h>


long n, nr;


void cit();
void rez();
void scr();


int main() {


	freopen("fractii.in", "r", stdin);
	freopen("fractii.out", "w", stdout);


	cit();
	rez();
	scr();


	return 0;
}


void cit() {
	scanf("%ld", &n);
}



int irec(long p, long q) {


	if(p%2==0 && q%2==0)
		return 0;

	long m;

	if(p<q)
		m=q/2;
	else
		m=p/2;


	for(int d=3; d<=m; d+=2)
		if(p%d==0 && q%d==0)
			return 0;

	return 1;

}



void rez() {

	nr=2*n-1;

	for(long p=2; p<=n; p++) {


		for(long q=2; q<=n; q++)

			if(irec(p,q))
				if(p!=q)
					nr++;

	}
}


void scr() {
	printf("%ld", nr);
}