Cod sursa(job #394576)

Utilizator nnookiaPurcelea Iulian Valentin nnookia Data 11 februarie 2010 09:53:11
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.28 kb
Raporteaza aceasta sursa 
#include<fstream.h>
#define endl 'n\'
int main(){
ifstream fin ("fractii.in");
ofstream fout ("fractii.out");
long n,p,q,a,b,t=0,r;
fin>>n;
for(p=1;p<=n;p++)
	for(q=1;q<=n;q++){
		a=p;
		b=q;
		while(b){r=a%b;
			 a=b;
			 b=r;}
		if(a==1)t++;}
fout<<t;
return 0;
}