main :: IO () main = do n <- read <$> getLine putStrLn $ main' n main' :: Int -> String main' n = show $ n * 10