Cod sursa(job #229940)

Utilizator BlackjackmdsSpataru Madalin Daniel Blackjackmds Data 12 decembrie 2008 10:48:45
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
#include <iostream.h>
#include <fstream.h>
fstream f("fractii.in",ios::in);
fstream g("fractii.out",ios::out);
long N,m,i,j,x,y;
int main()
{f>>N;
f.close();
m=N+(N-N/2)+(N-N/3);
for(i=4;i<=N;i++)
	for(j=i;j<=N;j++)
	 {x=i;y=j;
	  while(x!=y)
	     if (x>y) x=x-y;
		 else y=y-x;
	  if(x==1) m++;
	 };
g<<m;
g.close();
return 0;
}