如果发现广告等破坏行为，请尽量将条目恢复到较早的版本而不是把相应内容直接删除，谢谢合作。

来自"NOCOW"

输入整数a，判断他是奇数还是偶数（用if语句） 如： 输入：5 输出：jishu ；输入：6 输出：oushu. 用Pascal程序怎么编？

var

 a:integer;

begin

 readln(a);
 if a mod 2=0 then writeln('oushu')
              else writeln('jishu');

end.