import Control.Applicative

main = do
    [a,b,c,d] <- map read . words <$> getLine
    putStrLn $ solve a b c d
solve a b c d | a + b > c + d = "Left"
              | a + b == c + d = "Balanced"
              | otherwise = "Right"