判断某一年y是否是闰年。闰年的条件是符合下面二者之一：①能被4整除，但不能被100整除; ②能被400整除，下列语句正确的是
A: if y mod 4 =0 and y mod 100 <> 0 and y mod 400=0 then msgbox y & "是闰年"else msgbox y & "不是闰年"end if
B: if (y mod 4 =0 and y mod 100 <> 0) or y mod 400=0 then msgbox y &"不是闰年"else msgbox y & "是闰年"end if
C: if (y mod 4 =0 or y mod 100 <> 0) and y mod 400=0 then msgbox y &"是闰年"else msgbox y & "不是闰年"end if
D: if (y mod 4 =0 and y mod 100 <> 0) or y mod 400=0 then msgbox y &"是闰年"else msgbox y & "不是闰年"end if
A: if y mod 4 =0 and y mod 100 <> 0 and y mod 400=0 then msgbox y & "是闰年"else msgbox y & "不是闰年"end if
B: if (y mod 4 =0 and y mod 100 <> 0) or y mod 400=0 then msgbox y &"不是闰年"else msgbox y & "是闰年"end if
C: if (y mod 4 =0 or y mod 100 <> 0) and y mod 400=0 then msgbox y &"是闰年"else msgbox y & "不是闰年"end if
D: if (y mod 4 =0 and y mod 100 <> 0) or y mod 400=0 then msgbox y &"是闰年"else msgbox y & "不是闰年"end if
举一反三
- 【单选题】16: 满足下列条件之一的年份是闰年: 1) 年份能被 4 整除但不能被 100 整除 2) 年份能被 400 整除 若 y 代表年份,下面判断闰年的正确表达式是 () 。 A. A) y Mod 4 And y Mod 100 Or yMod 400 B. B) y Mod 4 ＝ 0 Or y Mod 100<>0 And y Mod 400 ＝ 0 C. C) y Mod 100<>0 And(y Mod4 ＝ 0 Or y Mod 400 ＝ 0) D. D) y Mod 4 ＝ 0 And y Mod 100<>0 Or y Mod 400 ＝ 0
- 判断年份y是否为闰年的表达式为（）。 A: (y%4 == 0) || (y%400 == 0 && y%100 != 0) B: (y%4 == 0 && y%100 != 0) || (y%400 == 0) C: y%4 == 0 && y%100 != 0 D: y%4 == 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)
- '''判断某一年是否为闰年 。判断闰年的条件是：年份能被4整除且不能被 100 整除 ，或者能被 400 整除。 ''' [br][/br] y = int( input('请输入年份＞＞')) if print("是闰年") y % 4 == 0 and y % 100 != 0: print("是闰年") else: ("不是闰年")