module Main where

import System.IO

main :: IO ()
main = do                                                                                                                                                                    
  [d,n] <- map (read :: String -> Int) . words <$> getLine

  let numline = [1..99] ++ [101]
  print $ (numline !! (n-1)) * 100^d