Cod sursa(job #91643)

Utilizator emy2704S Octav emy2704 Data 12 octombrie 2007 22:58:19
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.29 kb
#include<stdio.h>
int main()
{
long n,m,p,q;
FILE *fin,*fout;
fin=fopen("fractii.in","r");
fscanf(fin,"%ld",&n);
m=n;
for (p=1;p<=n;p++)
{q=2;
while(q<n) 
{if(p%q!=0) {m++;q++;};
}}
fout=fopen("fractii.out","w");
fprintf(fout,"%ld",m);
fclose(fin);
fclose(fout);
return 0;
}