-- yukicoder My Practice -- author: Leonardone @ NEETSDKASU main = interact $ unlines . map (head . filter (/="") . uncurry ((. concat) . flip (:)) . splitAt 1 . zipWith ($) ((uncurry ((!!) . ((:repeat "") . show)) . (`divMod` 3)) : (zipWith (.) (map ((!!) . (:repeat "")) ["iki", "sugi"]) [(`mod` 8), (`mod` 10)])) . replicate 3) . map read . tail . lines