Cod sursa(job #392495)

Utilizator meandyou01George Tudor meandyou01 Data 7 februarie 2010 16:26:09
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include<fstream.h> 
ifstream fin("fractii.in"); 
ofstream fout("fractii.out"); 
long n,i,j,s,k,min; 
int sw; 
int main() 
{fin>>n; 
   for(i=1;i<=n;i++) 
     for(j=1;j<=n;j++) 
     { sw=1;  
       if(i<=j)min=i;else min=j; 
       for(k=2;k<=min;k++) 
       if(i%k==0 && j%k==0){sw=0;break;} 
       if(sw==1)s++; 
  
     } 
 
fout<<s; 
fin.close(); 
fout.close(); 
}