Cod sursa(job #305527)

Utilizator funlovinggirlCernea Teodora funlovinggirl Data 17 aprilie 2009 18:21:37
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
#include<fstream.h>
int i,j,n,r,s,m,k=1,cmmdc;
int main ()
{ 
ifstream in("fractii.in");
ofstream out("fractii.out");
in>>n;
for (i=1;i<=n;i++)
    { for (j=1;j<=n;j++)
       { s=i/j;
	     r=i; m=j;
		 while (r!=m)
		 { if(r>m) r=r-m;
		   if(m>r) m=m-r;
		   cmmdc=r; }
	 if ((cmmdc==1)&&(i!=j)) k++;
		 }}
out<<k;
return 0;
}