while~0:i=input();s=['RNK'[ord(':@.dB0f*`r'[i/96])/3**k%3]for k in range(5)];s[i/16%6:0]='Q';s[i%4*2|(i%4