$r=<>;
$_=<>;
$,=$r|0?$r-13?M:N:A;
eval"y/!?[]$,-ZA-z/?![]A-za-n/";
print