import Control.Monad

main = do
  l <- readLn
  n <- readLn
  _ <- getLine
  print $ n * 2 ^ (l-3)