Cod sursa(job #162170)

Utilizator mihaimoldovanMihai Moldovan mihaimoldovan Data 19 martie 2008 16:41:30
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.61 kb
#include <fstream.h>
int main()
{
 int n,nr=0,k,i,j,pp,max;
 ifstream fin("fractii.in");
 fin>>n;
 fin.close();
 for(i=2;i<=n;i++)
     for(j=1;j<=n;j++)
         {
          pp=1;
          if(i==j)pp=0;
          if((i%j==0||j%i==0)&&j!=1)pp=0;
          if(pp)
                {
                 if(i>j)max=i;
                 else max=j;
                 if(i%2==0&&j%2==0)pp=0;
                 for(k=3;k<max&&pp==1;k+=2)
                    if(i%k==0&&j%k==0)pp=0;
                }
          if(pp)nr++;       
         }
 ofstream fout("fractii.out");
 fout<<nr+n;
 fout.close();
 return 0;
}