import Control.Applicative

zeros = [1..99]++[101]
ones = map (*100) zeros
twos = map (*100) ones

main = do
    [d,n] <- map read.words <$> getLine :: IO [Int]
    putStrLn.show $ answer d n

answer 0 n = zeros !! (n-1)
answer 1 n = ones !! (n-1)
answer 2 n = twos !! (n-1)