a=b=:Pen,c=:Pineapple,d=:Apple
$><<[gets[?A]?a:/i/?c:d,b]*' '