Cod sursa(job #261184)

Utilizator AndrewTheGreatAndrei Alexandrescu AndrewTheGreat Data 17 februarie 2009 22:13:26
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<fstream.h>
#include<math.h>
int prime(int x)
{
int ok=1,i;
for(i=2;ok==1&&i<=sqrt(x);i++)
    if(x%i==0)ok=0;
return ok;
}
int main(){
int nr,i,j,n,r,y,x;
ifstream in("fractii.in");
ofstream out("fractii.out");
in>>n;
nr=2*n-1;
for(i=2;i<=n;i++)
   for(j=2;j<=n;j++)
     if(!(i%2==0&&j%2==0))
	{
	if((prime(i)==1&&j%i!=0)||(prime(j)==1&&i%j!=0))nr++;
	   else{x=i;y=j;while(y!=0){r=x%y;x=y;y=r;}
		if(y==1)nr++;}
	}
out<<nr;
return 0;}