main :: IO () main = do k <- readLn s <- readLn putStrLn $ show $ truncate $ (/) s $ (/) (100 - k) 100