Cod sursa(job #696752)

Utilizator tanduraDomnita Dan tandura Data 28 februarie 2012 19:55:51
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include<fstream>
using namespace std;

int cmmdc(int a,int b)
{if(a%b==0)
	return b;
 else
	return cmmdc(b,a%b);
}

int main()
{long n,i,j,k,c;
ifstream g("fractii.in");
g>>n; k=0;
for(i=1;i<=n;i++)
   {for(j=i-1;j>0;j--)
	   {c=cmmdc(i,j);
		if(c==1)
		  k++;
	   }
	for(j=i+1;j<=n;j++)
	   {c=cmmdc(i,j);
		if(c==1)
		  k++;
	   }
   }
k++;
ofstream t("fractii.out");
t<<k;
g.close();
t.close();
return 0;
}