module Main where

import Control.Monad

low = -99999999
high = 99999999

main :: IO ()
main = do
    [a, b] <- fmap read . words <$> getLine :: IO [Integer]
    case (a `mod` 100, b `mod` 100) of
        (0, 0) -> do
            print $ a * b `div` 10
        _      -> do
            let ans = a * b
            if (ans < low) || (high < ans)
                then putStrLn "E"
                else print ans