program ABC168A;
var
    n: Integer;
    c: Integer;
begin
    read(n);
    c := n mod 10;
    case c of
    	3: writeln('bon');
       	0, 1, 6, 8: writeln('pon');
        else writln('hon');
    end;
end.