[填空题] 给定年份，下列程序用来判断该年是否是闰年，请填空。　　Sub YN( )　　　　Dim X AS Integer　　　　x＝Input Box("请输入年号")　　　　If( x Mod 4=0 【】 x Mod l000) 【】 (x　Mod　400=0)Then　　　　　　Print"是闰年"　　　　Else　　　　　　Print"不是闰年，是普通年份"　　　　End If　　End Sub

参考答案：

And

● 参考解析

此题主要考查了闰年的条件，并把条件用逻辑关系式表示出来。闰年的条件是能被四整除不能被100整除的是闰年，或者是能被400整除，所以由此可以写出逻辑关系式：(xMod4=0AndxModl000)Or(xMod400=0)。

相关题目:

推荐题目