Cod sursa(job #17827)

Utilizator razyelxrazyelx razyelx Data 16 februarie 2007 23:24:43
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.48 kb
#include<fstream.h>
int main(){
	long i,j,n,auxi,auxj,nr=0;

	ifstream f("fractii.in");
	f>>n;
	for(i=1;i<=n;i+=2)
		for(j=1;j<=n;j++){
				auxi=i;auxj=j;
				while(auxi!=auxj)
					if(auxi>auxj)auxi-=auxj;
					else auxj-=auxi;
				if(auxi==1)nr++;
			}
	for(i=2;i<=n;i+=2)
		for(j=1;j<n;j++){
			auxi=i;auxj=j;
			while(auxi!=auxj)
				if(auxi>auxj)auxi-=auxj;
				else auxj-=auxi;
			if(auxi==1)nr++;
                }
	ofstream g("fractii.out");
	g<<nr;
	return 0;
}