Cod sursa(job #791133)

Utilizator paul_danutDandelion paul_danut Data 23 septembrie 2012 08:08:39
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.52 kb
#include <fstream>
using namespace std;
ifstream f("fractii.in");
ofstream g("fractii.out");
int cmmdc(int p,int q)
{while(p!=q)
	if(p>q)
		p-=q;
	else
		q-=p;
return p;}	
int a,i,d,n,nr,p,q,t=0;
int main()
{f>>n;
nr=0;
for(p=1;p<=n;p++)
	for(q=1;q<=n;q++)
		{if(p%q!=0)
			nr++;
		else
			if(p/q!=t&&p/q>t&&cmmdc(p,q)==1)
			  {d=2;
		      i=0;
			  a=p/q;
		      while(d<=a/2)
				  {if(a%d==0)
					i++;
				  d++;}
			  if(i==0)
				  nr++;
			  t++;}}
g<<nr<<' ';
f.close();
g.close();
}