getNum :: Int -> Int
getNum n
  | n == 100 = 101
  | otherwise = n

getZero :: Int -> Int
getZero d
  | d == 0 = 1
  | d == 1 = 100
  | otherwise = 10000

main = do
  [d, n] <- (map read . words) <$> getLine
  print $ ((getNum n) * (getZero d))