{-# LANGUAGE TypeApplications #-}

main = do
  [h, r] <- map (read @Double) . words <$> getLine
  print $ 8.245 + 6.807 * h + 7.073 * r