(*
ocamlfind ocamlopt -package batteries -linkpkg main.ml -o a.out
*)
open Batteries

let a, b = Scanf.sscanf (read_line ()) "%d %d" ( fun a b -> a, b)

let () = 
        (
                let ez = (a < 0) && (b > 0) in
                let nn = 
                        (
                                if a < 0 && b < 0 then
                                        (abs a) - (abs b) + 1
                                else
                                if a < 0 then
                                        (abs a)
                                else
                                        0
                        ) in
                        if ez then
                                "Zero"
                        else
                        if nn mod 2 = 0 then
                                "Positive"
                        else
                                "Negative"
        ) |> Printf.printf "%s\n"

