data Stat = Positive | Negative | Zero deriving Show

main = do
 [a,b] <- map read . words <$> getLine
 print (rp a b)

rp a b
 | a<=0 && b>=0 = Zero
 | a>0 || odd (a-b) = Positive
 | otherwise = Negative