($a,$b)=sort{$a<=>$b}glob<>;
print$a&1&&($a==$b-1|$a==$b)?Q:P