Cod sursa(job #1009653)

Utilizator tudosestefanStefan Tudose tudosestefan Data 13 octombrie 2013 16:57:40
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include <fstream>

using namespace std;

ifstream in("fractii.in");
ofstream out("fractii.out");

int main()
{   int p,q,n,r,c,d,s=0;
in>>n;

for(p=1;p<=n;p++)
   {

    for(q=1;q<=n;q++)
     {r=p%q;
      c=p;
      d=q;
      while(r){c=d;
              d=r;
              r=c%d;
              }
      if(d==1) s=s+1;
     }

   }

out<<s;

    return 0;
}