Imports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.Linq
Imports System.IO

Public Class Program


    Public Shared Sub Main(args As String())

        Dim input = Console.ReadLine()
        Select Case Integer.Parse(input.Substring(input.Length - 1))
            Case 2, 4, 5, 7, 9
                Console.WriteLine("hon")
            Case 0, 1, 6, 8
                Console.WriteLine("pon")
            Case 3
                Console.WriteLine("bon")
        End Select


    End Sub




End Class