import std.stdio;
import std.algorithm;
import std.string;
import std.conv;
import std.math;

void main(){

    int[] primes = [2,3,5,7];
    for(int i=11;i<70000;i++){
	bool flg =true;
	for(int j=0;primes[j]*primes[j]<j;j++){
	    if(i % primes[j] == 0) flg = false;
	}
	if(flg) primes ~= i;
    }

    while(true){
	int n = to!int(chomp(readln()));
	int ans = 0;
	if(n==0) break;
	for(int i=0;primes[i]<=n;i++)
	    for(int j=i;primes[i]+primes[j]<=n;j++)
		if(primes[i]+primes[j]==n) ans++;
	writeln(ans);
    }
}