import Control.Applicative ((<$>))

main :: IO ()
main = solve <$> map read <$> words <$> getLine >>= putStrLn

solve :: [Integer] -> String
solve [a, b] | anzan a && anzan b = show $ a * b `div` 10
             | a * b > 99999999 = "E"
             | a * b < -99999999 = "E"
             | otherwise = show $ a * b

anzan :: Integer -> Bool
anzan x | -100 < x && x < 100 = False
        | x > 0 = all (== '0') $ tail $ show x
        | otherwise = all (== '0') $ drop 2 $ show x