import Data.List

main :: IO ()
main = do
    [d,n] <- map read . words <$> getLine :: IO [Int]
    let lis = if d == 0 then filter ((/= 0) . (`rem` 100)) [1..]
                        else map (* (100^d)) [1..]
    print $ lis!!(n-1)
