下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，横线处应填( )。 Sub EnSure() Dim year As Integer year=Val(InputBox("请输入年份：")) If(year Mod 4=0______year Mod 100＜＞0)______(year Mod 400=0)Then Print"您输入的是闰年" Else Print"不是闰年，是普通年份" End If End Sub
A: And And
B: And Or
C: Or Or
D: Or Or
A: And And
B: And Or
C: Or Or
D: Or Or
举一反三
- 以下程序的功能是判断输入的年份是否为闰年。year=int(input("请输入年份"))if year%4==0 （__） year%100!=0（__）year%400==0: print("闰年")else: print("平年")
- 下列逻辑表达式能判断是否闰年的是（ ）。 注：year是数值型的年份数据，闰年条件：1、年份是400整数倍；2、年份是4整数倍但不是100整数倍。 A: year mod 400 <> 0or (year mod 4 = 0) or (year mod 100 <> 0) B: year mod 400 = 0and (year mod 4 = 0) and (year mod 100 <> 0) C: (year mod 400 <> 0) or (year mod 4 = 0) and (year mod 100 <> 0) D: (year mod 400 = 0) or ( year mod 4 = 0) and (year mod 100 <> 0)
- 输入一个年份,判断它是否为闰年。判断闰年的条件为:如果某年份能被4整除并且不能被100整除的或者能被400整除的,则该年为闰年。 Private Sub Form_Click() Dim y% y = Val(InputBox("请输入年份", "闰年计算")) If 【1】 Or y Mod 400 = 0 Then Print y, "是闰年" Else Print y, "不是闰年" End If End Sub
- 判断变量year是否是闰年(判断闰年条件是能被4整除并且不能被100整除是闰年，或者能被400整除是闰年)的表达式是（ ）。 A: ((year mod 4=0) and(year mod 100!=0)) or (year mod 400=0) B: ((year mod 4=0) or (year mod 100!=0)) or (year mod 400=0) C: ((year mod 4=0) and(year mod 100!=0)) and (year mod 400=0) D: ((year mod 4=0) or(year mod 100=0)) and (year mod 400=0)
- 执行如下代码, 则程序的运行结果是________。year = eval(input("输入年份：")) # 可用int()函数 if (year%4==0 and year%100 !=0) or (year%400==0): print(year,": 闰年") else: print(year,": 非闰年")当运行时输入2018时，程序运行结果如何？