使用delphi编程,输入一个年份,判断是否为闰年?急用,谢谢!
答案:2 悬赏:30 手机版
解决时间 2021-04-03 10:19
- 提问者网友：椧運幽默
- 2021-04-03 03:29
1.能被4整除,但是不能被100整除.2.即能被100整除,又能被400整除.
最佳答案
- 五星知识达人网友：零点过十分
- 2020-04-23 10:29
if ((AYear mod 4) = 0) and ( ( (AYear mod 100) <> 0) or ( (AYear mod 400) = 0) ) then
ShowMessage('闰年')
else
ShowMessage('非闰年')
ShowMessage('闰年')
else
ShowMessage('非闰年')
全部回答
- 1楼网友：第四晚心情
- 2020-12-02 02:22
function IsRunYear(AYear: word): boolean
begin
Result := ((AYear mod 4) = 0) and ( ( (AYear mod 100) <> 0) or ( (AYear mod 400) = 0) );
end;
再看看别人怎么说的。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯