Cod sursa(job #230176)

Utilizator fecheteFechete Horia-Dan fechete Data 13 decembrie 2008 10:41:21
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
#include<fstream.h>
#define fin "fractii.in"
#define fout"fractii.out"
int main()
{	int n,p,q,r,k;
	ifstream in(fin);
	in>>n;
	k=0;
	r=p%q;
	for(p=1;p<=n;p++)
		{ for(q=1;q<=n;q++) { p=q;  q=r;   r=p%q;
				      if(q==1) k++;
				    }
		}
	ofstream out(fout);
	out<<k;
	out.close();
	return 0;
}