home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 109.lha / PD_C / examples / Sieve.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-11-20  |  490 b   |  34 lines
  1.  
  2. #define true 1
  3. #define false 0
  4. #define size 8190
  5. #define sizepl 8191
  6. char flags[sizepl];
  7.  
  8. main()
  9. {
  10.    int i,prime,k,count,iter;
  11.    printf("10 iterations\n");
  12.    for(iter=1;iter<= 10;iter++)
  13.      {
  14.     count=0;
  15.     for(i = 0; i<=size;i++)
  16.        flags[i]=true;
  17.     for(i=0;i <= size; i++)
  18.       {
  19.         if(flags[i])
  20.           {
  21.         prime = i+i+3;
  22.         k=i+prime;
  23.         while(k<=size)
  24.           {
  25.              flags[k] = false;
  26.              k += prime;
  27.           }
  28.         count = count+1;
  29.           }
  30.       }
  31.      }
  32.    printf("\n%ld primes\n",count);
  33. }
  34.