以下程序的功能是判断输入的年份是否为闰年。year=int(input("请输入年份"))if year%4==0 (__) year%100!=0(__)year%400==0: print("闰年")else: print("平年")
举一反三
- 执行如下代码, 则程序的运行结果是________。year = eval(input("输入年份:")) # 可用int()函数 if (year%4==0 and year%100 !=0) or (year%400==0): print(year,": 闰年") else: print(year,": 非闰年")当运行时输入2018时,程序运行结果如何?
- 执行如下代码, 则程序的运行结果是 。year = eval(input("输入年份:")) # 也可用int()函数 if (year%4==0 and year%100 !=0) or (year%400==0): print("闰年") else: print("非闰年")当运行时输入1900时,程序运行结果如何?
- 下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,横线处应填( )。 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
- 下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,横线处应填( )。 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 Of
- 下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,横线处应填( )。 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 0r