Cod sursa(job #661071)

Utilizator NavodaruRoxanaNavodaru Roxana NavodaruRoxana Data 13 ianuarie 2012 18:50:51
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.33 kb
#include<fstream>
using namespace std;
int main()
{long n, c, a, b, s, d, r;
ifstream f("fractii.in");
ofstream h("fractii.out");
f>>n;
c=0;
a=1;
b=1;
c=2*n-1;
do
{a=a+1;
do
{b=b+1;
s=a;
d=b;
do
{r=s%d;
s=d;
d=r;}
while(r!=0);
if(s==1)
{c=c+1;}}
while(b==n);}
while(a==n);
h<<c;
f.close();
h.close();
return 0;}