$/=$";$a[$_]++for<>;print/23/?'FULL HOUSE':/3/?'THREE CARD':/2/?(/22/?TWO:ONE).' PAIR':'NO HAND'for join'',sort@a