import Control.Monad
import Control.Applicative

solver :: [Int] -> Int
solver [d, n]
    | d == 0    = n
    | otherwise = n * (100^d)

main :: IO ()
main = getLine >>= print . solver . (map read) . words
