Cod sursa(job #535090)

Utilizator CazaceanuAndreiCazaceanu Andrei Adrian CazaceanuAndrei Data 16 februarie 2011 19:13:06
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.49 kb
#include <fstream.h>
#include <conio.h>
int nrp( int a, int b)
{
	while (a!=b)
   {
   	if (a>b)
      {a-=b;}
      else
      {b-=a;}
   }
   if (a==1)
   {
     return 1;
   }
   else return 0;
}

int main()
{
   int n,i,j,k=0;
	fstream f("fractii.in.txt",ios::in);
   fstream g("fractii.out.txt", ios::out);
   f>>n;

   for (i=1;i<=n;i++)
   {
   	for (j=1;j<=n;j++)
      {
      	if (nrp (i,j))
         {k++;}
      }
   }
g<<k;
f.close();
g.close();
getch();
}