Cod sursa(job #282055)

Utilizator giuliastefGiulia Stef giuliastef Data 16 martie 2009 20:04:48
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
// infoarena 1.0 - fractii

#include <fstream>
int cmmdc(long int x,long int y)
{
    long int r;
    r=x%y;  
    while(r)  
    {  
             x=y;  
             y=r;  
             r=x%y;  
     }  
     if(y==1)  
             return 1;  
     return 0; 
}
using namespace std;
int main()
{
    long int n,i,j,c=1;
    ifstream f("fractii.in");
    ofstream g("fractii.out");
    f>>n;
    for(i=1;i<n;i++)
     for(j=i+1;j<=n;j+=2)
      if(cmmdc(i,j)==1) c+=2;
    g<<c<<"\n";
    f.close();
    g.close();
    return 0;
}