An integer p > 1 is called a prime number if its only positive divisors are 1 and p. An integer greater than 1 that is not a prime is called a composite. There are an infinite number of primes, the first 15 primes are:

  2  3  5  7  11  13  17  19  23  29  31  37  41  43  47 ...

Using Sieve of Eratosthenes algorithm, write a Fortran program to list and count all prime numbers less than 10000.