program main
	implicit none
	integer(8):: N,i,j,t,B,k
	read *, N
    !read(*,*) (A(i), i = 1, N)
    
	i=N/100
	j=N/10
	k=N-i*100-j*10
	if(k==2)write(*,*)"hon"
	if(k==4)write(*,*)"hon"
	if(k==5)write(*,*)"hon"
	if(k==7)write(*,*)"hon"
	if(k==9)write(*,*)"hon"
	if(k==0)write(*,*)"pon"
	if(k==1)write(*,*)"pon"
	if(k==6)write(*,*)"pon"
	if(k==8)write(*,*)"pon"
	if(k==3)write(*,*)"bon"
	
end program main