import Control.Applicative ((<$>))

main :: IO ()
main = do
    [s, _] <- fmap read . words <$> getLine :: IO [Int]
    putStrLn $ show s ++ "%"