checkclass :: Double -> String
checkclass w 
    | w<=48.00  = "light fly"
    | w<=51.00  = "fly"
    | w<=54.00  = "bantam"
    | w<=57.00  = "feather"
    | w<=60.00  = "light"
    | w<=64.00  = "light welter"
    | w<=69.00  = "welter"
    | w<=75.00  = "light middle"
    | w<=81.00  = "middle"
    | w<=91.00  = "light heavy"
    | otherwise = "heavy"

solve::Double-> IO ()
solve w = do
    putStrLn $ checkclass w

main::IO ()
main=do
    str<-getContents::IO String
    mapM_ solve $ map (\x->read x::Double) . lines $ str