import Control.Applicative

main = do
  [a, b] <- map (read::String -> Int) . words <$> getLine
  print $ judge a b
  
judge::Int -> Int -> Int
judge a b
  | a >= 13 = b
  | a >= 6 = b `div` 2
  | otherwise = 0
