import Control.Arrow ((>>>)) main :: IO () main = interact $ words >>> map read >>> solve solve :: [Integer] -> String solve xs = if a+b>a*b then "S\n" else if a+b==a*b then "E\n" else "P\n" where a = xs !! 0 b = xs !! 1