   program abc168a
      implicit none
      character(3)::n
      integer::i

         read *, n
         i=len_trim(n)

         if ( n(i:i)=='2' .or. n(i:i)=='4' .or. n(i:i)=='5' &
             .or. n(i:i)=='7' .or. n(i:i)=='9' ) then
            print *, 'hon'
         else if ( n(i:i)=='0' .or. n(i:i)=='1' &
                  .or. n(i:i)=='6' .or. n(i:i)=='8' ) then
            print *, 'pon'
         else
            print *, 'bon'
         end if

   end program abc168a