Cod sursa(job #157372)

Utilizator Ionutz_LalaLala Marius Ionut Ionutz_Lala Data 12 martie 2008 23:23:25
Problema Ciurul lui Eratosthenes Scor 30
Compilator cpp Status done
Runda Arhiva educationala Marime 0.33 kb
#include<stdio.h>
short int pr[32000];
int main()
{
 long int n,p,np=0,m;
 FILE *f=fopen("ciur.in","r"),*g=fopen("ciur.out","w");
 fscanf(f,"%ld",&n);
 for(p=2;p<=n/2;)
 {
   for(m=2;p*m<=n;m++)
     pr[m*p]=1;
   p++;
   while(pr[p]) p++;
 }
 for(p=2;p<=n;p++)
   if(!pr[p]) np++;
 fprintf(g,"%ld",np);
 return 0;
}