RosettaCodeData/Task/Even-or-odd/Maple/even-or-odd.maple

EvenOrOdd := proc( x::integer )
   if x mod 2 = 0 then
      print("Even"):
   else
      print("Odd"):
   end if:
end proc:
EvenOrOdd(9);