require"prime"
while gets
    n=$_.to_i
    break if n==0
    count=0
    Prime.each(n).each do |prime1|
        Prime.each(n).each do |prime2|
            count+=1 if prime1+prime2==n && prime1<=prime2
        end
    end
    p count
end