阿摩線上測驗
38. 請問下列程式於 Visual Basic 執行運算後，所得 100 個數值,下列數值哪一個不會出現？
Private Sub Command1_Click() Dim i As Integer Print "abc" For i = 1 To 100 Print Int(Rnd * 69) And 23; Next i End Sub
(A) 7
(B) 10
(C) 21
(D) 22
Private Sub Command1_Click()
Dim i As Integer
Print "abc"
For i = 1 To 100
Print Int(Rnd * 69) And 23;
Next i
End Sub
(A) 7
(B) 10
(C) 21
(D) 22
答案：登入後查看
統計： A(11), B(49), C(26), D(15), E(0) #611753
統計： A(11), B(49), C(26), D(15), E(0) #611753
詳解 (共 1 筆)
TingChun Huang
#894984
取亂數與23做and運算
先轉2進制 23=10111 可推論 第四位必不為1
答案...........
2
1
