delphi 判断奇数偶数
if x mod 2=0 then write('偶数') else write('奇数');
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved 晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.045732021331787 seconds