Cod sursa(job #16830)

Utilizator radoo_sk8erTrandafir Radu radoo_sk8er Data 14 februarie 2007 09:09:41
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
# include <fstream.h>
main()
{long double f;
long int n,c,i,d=0,x,y;
ifstream fi;
ofstream fo;
fi.open("fractii.in");
fo.open("fractii.out");
fi>>n;
f=n*n;
for(i=1;i<=n;i++){for(c=1;c<=n;c++){x=i;y=c;
		 while(x!=y){if(x>y)x=x-y;
			    else y=y-x;}
		 if(x>1)d=d+1;
		 }}
f=f-d;fo<<f;
fi.close();
fo.close();
}