import Data.Bits

main :: IO ()
main = interact $ show . (\[x, y] -> x .|. y). map (read :: String -> Int) . words