проверить номер с 4 условиями - PullRequest
0 голосов
/ 22 февраля 2020

Я новичок здесь, и мне нужна помощь с моим простым кодом, если это возможно

в визуальном прологе. Я хочу проверить число в 4 случаях -1, отрицательное нечетное 1, положительное нечетное

-2, отрицательно даже 2, положительно даже

я пробую это

Predicates 
Print.  
Clauses 
Print:- write ("enter number "),nl, readint(X),
        X>0,X mod 2= 0,write("positive ","even"),
        X<0,X mod 2= 0,write("negative ","even") ,

        X>0,X mod 2 <> 0,write("positive ","odd"),
        X<0,X mod 2 <> 0,write("negative ","odd") .

Goal 
Print.

любая идея, чтобы помочь мне с этой проблемой

...