Cod sursa(job #247823)

Utilizator CrystopherJalba Cristian Crystopher Data 24 ianuarie 2009 08:41:11
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.53 kb
#include<fstream>
using namespace std;

int main()
{int n,i,nr=0,j,r;
 ifstream in("fractii.in");
 ofstream out("fractii.out");
 in>> n;
 for (i=1;i<=n;i++)
	{for (j=1;j<=n;j++)
      {if (i>j) 
	    {r=i%j;
	     while (r) 
		 { i=j;
           j=r;
           r=i%j;
         }
          if (j==1) nr=nr+1;
		}
       if (j>i)
	   {r=j%i;
        while (r)
		 {j=i;
          i=r;
          r=j%i;
         }
         if (i==1) nr=nr+1;
	    }
	  } 
	}
 out<< nr;
 in.close ();
 out.close ();
 return 0;
}