visual-prolog - 4つの条件付き小切手番号

Question

私はここにいるのは初めてで、可能であれば簡単なコードについて助けが必要です

ビジュアル プロローグでは、 -1 、負の奇数 1 、正の奇数の 4 つのケースで数値を確認したい

-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.

この問題で私を助けるためのアイデア