module Main where import Control.Monad main :: IO () main = do [k, s] <- replicateM 2 readLn :: IO [Int] let t = (s * 100) `div` (100 - k) print t