File: sieve.cs

package info (click to toggle)
mono 4.6.2.7%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 778,148 kB
  • ctags: 914,052
  • sloc: cs: 5,779,509; xml: 2,773,713; ansic: 432,645; sh: 14,749; makefile: 12,361; perl: 2,488; python: 1,434; cpp: 849; asm: 531; sql: 95; sed: 16; php: 1
file content (32 lines) | stat: -rw-r--r-- 594 bytes parent folder | download | duplicates (8)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
/* -*- mode: c -*-
 * $Id$
 * http://www.bagley.org/~doug/shootout/
 */

class Test {
static public int Main() {
    //int NUM = ((argc == 2) ? atoi(argv[1]) : 1);
    int NUM = 300;
    byte[] flags = new byte[8192 + 1];
    int i, k;
    int count = 0;

    while (NUM-- != 0) {
	count = 0; 
	for (i=2; i <= 8192; i++) {
	    flags[i] = 1;
	}
	for (i=2; i <= 8192; i++) {
	    if (flags[i] != 0) {
		// remove all multiples of prime: i
		for (k=i+i; k <= 8192; k+=i) {
		    flags[k] = 0;
		}
		count++;
	    }
	}
    }
    System.Console.WriteLine("Count: {0}\n", count);
    return(0);
}
}