parseInt x = read x :: Int

solve :: Int -> Int -> String
solve a b = show $ maximum [a + b, a - b, a * b]

main :: IO()
main = do
    line <- getLine
    let nums = map parseInt . words $ line
    putStrLn $ solve (nums !! 0) (nums !! 1)