program yukicoder_2671 use, intrinsic :: iso_fortran_env implicit none integer(int32) :: k read(input_unit, *) k select case(k) case(1); write(output_unit, '(a)') "NUPC" case(2); write(output_unit, '(a)') "NNUPC" case(3); write(output_unit, '(a)') "NUNUPC" case(4); write(output_unit, '(a)') "NNUNNUPC" case(5); write(output_unit, '(a)') "NUPNUPC" case(6); write(output_unit, '(a)') "NNUPNNUPC" case(7); write(output_unit, '(a)') "NUNUPNUNUPC" case(8); write(output_unit, '(a)') "NNUNNUPNNUNNUPC" case(9); write(output_unit, '(a)') "NUPCNUPC" case(10); write(output_unit, '(a)') " NNUPCNNUPC" case(11); write(output_unit, '(a)') " NUNUPCNUNUPC" case(12); write(output_unit, '(a)') " NNUNNUPCNNUNNUPC" case(13); write(output_unit, '(a)') " NUPNUPCNUPNUPC" case(14); write(output_unit, '(a)') " NNUPNNUPCNNUPNNUPC" case(15); write(output_unit, '(a)') " NUNUPNUNUPCNUNUPNUNUPC" case(16); write(output_unit, '(a)') " NNUNNUPNNUNNUPCNNUNNUPNNUNNUPC" end select end program yukicoder_2671