hdu----2098

#include<iostream>
#include<cstdio>
using namespace std;
int m[10010],n[1300];
void getprime()
{
    for(int i=0;i<=10000;i++)
        m[i]=i+2;
    for(int i=0;i<=10000;i++)
    {
        if(m[i]==1) continue;
        for(int j=i+1;j<=10000;j++)
        {
            if(m[j]%m[i]==0)
                m[j]=1;
        }
    }
    int k=0;
    for(int i=0;i<=10000;i++)
    {
        if(m[i]!=1)
            n[k++]=m[i];
    }
}
int main()
{
    //freopen("jeslie.txt","r",stdin);
    getprime();
    int k;
    while(cin>>k&&k)
    {
        int i,j,ok=0,ans=0;
        for(i=0;i<1228;i++)
        {
            for(j=1228;j>0;j--)
            {
                if((n[i]+n[j])==k)
                {
                    if(n[i]==n[j])
                        ok=1;
                    ans++;
                    break;
                }
            }
        }
        if(ok)
            cout<<(ans-1)/2<<endl;
        else
            cout<<ans/2<<endl;
    }
    return 0;
}