main = do
    k <- readLn
    s <- readLn
    print $ (s * 100) `div` (100 - k)