Cod sursa(job #649777)

Utilizator FIIBCPBuzila Octavian Calin FIIBCP Data 16 decembrie 2011 18:21:14
Problema Ciurul lui Eratosthenes Scor 0
Compilator c Status done
Runda Arhiva educationala Marime 0.35 kb
Raporteaza aceasta sursa 
#include<stdio.h>
int main()
{ int n,k,i,j;
 char a[200000];
FILE *f,*g;
f=fopen("ciur.in","r");
g=fopen("ciur.out","w");
fscanf(f,"%d", &n);
for(i=2;i<=n;i++){
a[i]=1;
for(d=2;d*d<=n;d+=2)
b=d;
for(;b<=n;b+=2)
a[b]=0;
}
for(i=2;i<=n;i++)
if(a[i])
k++;
fprintf(g,"%d",k);
fclose(f);
fclose(g);
return 0;
}