X is 1 :- C rem 2 =/= 0.
X is 0 :- C rem 2 =:= 0.
write('even') :- X is 1.
write('odd'):- X is 0.