Не работает Решето Эратосфена

[Bruha1991]

Здравствуйте! Есть код, который должен реализовывать решето Эратосфена, но он почему-то не работает. Объясните пожалуйста почему и если можна исправте

<script>

	searchPrime(p){
		for(i = 1; i < 98; i++){
			if(((i + 2) % p) == 0){
				a[i] = false;
			}
		}
	}

	findP(i){
		while(i < 98){
			if(a[i] != false){
				p = i + 2;
			}
			i++;
		}
	}

	var a = [];
	var p = 2;

	for(var i = 0; i < 98; i++){
		a[i] = true;
	}
			
	while((p * p) < 99){
		searchPrime(p);
		findP(((a.indexOf(p)) + 1));
	}
			
	for(i = 0; i < 98; i++){
		if(a[i] == true){
			alert((i + 2));
		}
	}
			
</script>

[рони]

Bruha1991,
function где?

function remove(p){
		for(var i = 2*p; i < 98; i+=p){
				a[i] = false;
		}
     };

	var a = [];
	var p = 2;

	for(var i = 0; i < 98; i++){
		a[i] = true;
	}

	while(p * 2 < 99){
		remove(p);
		p++;
	}

	for(var i = 0; i < 98; i++){
		if(a[i] == true){
			alert(i);
		}
	}