Cod sursa(job #162324)

Utilizator agabrieiulianAntoniu Gabriel Iulian agabrieiulian Data 19 martie 2008 21:41:32
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.57 kb
#include <fstream.h>

long int cmmdc(long int a, long int b)
{  long int aux=0;

   while (a!=b && aux!=1)
   if (a<b) { aux=b-a;
	      b=b-a;
            }
			else  { aux=a-b;
              a=a-b;
            } 

   return aux;
}

int main(void)
{
	long int n,count=0;
  int i,j;

	ifstream date_intrare("fractii.in");
	ofstream date_iesire("fractii.out");

	date_intrare>>n;

	count=n;
	for(i=1;i<=n;i++)
	 for(j=2;j<=n;j++)
		 if(cmmdc(i,j)==1)
		  count++;

  date_iesire<<count;

	date_intrare.close();
	date_iesire.close();
	return 0;
}