Cod sursa(job #133761)

Utilizator Anamaria20Cotirlea Anamaria Anamaria20 Data 9 februarie 2008 17:48:06
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
#include <stdio.h>
FILE* f;
long int n;
long int p,q;
long int cat;
main()
{
	f=fopen ("fractii.in","r");
	fscanf (f,"%ld",&n);
	fclose (f);

	cat=0;
	for (p=1;p<=n;p++)
		for (q=1;q<=n;q++)
			if (p%q>0||q==1)
				cat++;

	f=fopen ("fractii.out","w");
	fprintf (f,"%ld\n",cat);
	fclose (f);
}