
 even(N) :- (N mod 2 =:= 0
 ->print('EVEN')
 ;print('ODD')
 ).
 