Cod sursa(job #162166)

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