home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / Borland / Cplus45 / BC45 / TPROFEXM.PAK / PRIME0.C < prev    next >
C/C++ Source or Header  |  1995-08-29  |  799b  |  36 lines
  1. /* Copyright (c) 1990, 1992, Borland International */
  2. /*  Program for generating prime numbers using Euclid's method */
  3. #include <stdio.h>
  4. int primes[1000];
  5. #define MAXPRIMES 1000
  6.  
  7. void main(void)
  8. {
  9.    int j;
  10.    int lastprime, curprime;
  11.  
  12.    primes[0] = 2;
  13.    primes[1] = 3;
  14.    lastprime = 1;
  15.    curprime  = 3;
  16.  
  17.    printf("prime %d = %d\n", 0, primes[0]);
  18.    printf("prime %d = %d\n", 1, primes[1]);
  19.    while(curprime < MAXPRIMES)
  20.    {
  21.       for(j = 0; j <= lastprime; j++)
  22.          if((curprime % primes[j]) == 0)
  23.          {
  24.             curprime += 2;
  25.  
  26.             break;
  27.          }
  28.       if(j <= lastprime)
  29.          continue;
  30.       lastprime++;
  31.       printf("prime %d = %d\n", lastprime, curprime);
  32.       primes[lastprime] = curprime;
  33.       curprime += 2;
  34.    }
  35. }
  36.