main=interact(\x->["",[1..21]>>"q",['A'..'Z'],"Helloworld"]!!mod(length$lines x)4)