请教一个问题

If[EvenQ[num = Input["请输入一个数："]], Print[num "是一个偶数"], Print[num "是一个奇数"]]
把两个Print用你的表达式代替就行了

举个例子：

可以用If或者带条件的模式，我推荐用带条件的模式，因为可读性和修改性更好，也就是这样：
f[x_?EvenQ]:=expr1[x];
f[x_?OddQ]:=expr2[x];