Cod sursa(job #91649)

Utilizator emy2704S Octav emy2704 Data 12 octombrie 2007 23:20:55
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#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%2==0)&&(q%2==0)) q++; 
if(p%q!=0) {m++;q++;};
}}
fout=fopen("fractii.out","w");
fprintf(fout,"%ld",m);
fclose(fin);
fclose(fout);
return 0;
}