UC知道vb问题高手解答
来源：百度知道 编辑：UC知道 时间：2024/05/11 03:46:10
Private Sub Command1_Click()
s = 0
For i = 1 To 15
x = 2 * i - 1
If x Mod 3 = 0 Then s = s + 1
Next i
Label1.Caption = s
End Sub
为什么结果是5?x算出来的应该是奇数3,9,15怎么求和后变成了
5?为什么?
还有一道
Private Sub Command1_Click()
For n = 1 To 20
If n Mod 3 <> 0 Then m = m + n \ 3
Next n
Print n
End sub
为什么结果是21不是对1,1,2,2,3,3,4,4,5,5,6,6的求和吗?求详细解答
Private Sub Command1_Click()
s = 0
For i = 1 To 15
x = 2 * i - 1
If x Mod 3 = 0 Then s = s + 1
Print x, s
Next i
Label1.Caption = s
End Sub
知道了第一题程序些成这样结果一目了然,自己想出来了 :)第二题的思路 乱敲回答的完全正确
s = 0
For i = 1 To 15
x = 2 * i - 1
If x Mod 3 = 0 Then s = s + 1
Next i
Label1.Caption = s
End Sub
为什么结果是5?x算出来的应该是奇数3,9,15怎么求和后变成了
5?为什么?
还有一道
Private Sub Command1_Click()
For n = 1 To 20
If n Mod 3 <> 0 Then m = m + n \ 3
Next n
Print n
End sub
为什么结果是21不是对1,1,2,2,3,3,4,4,5,5,6,6的求和吗?求详细解答
Private Sub Command1_Click()
s = 0
For i = 1 To 15
x = 2 * i - 1
If x Mod 3 = 0 Then s = s + 1
Print x, s
Next i
Label1.Caption = s
End Sub
知道了第一题程序些成这样结果一目了然,自己想出来了 :)第二题的思路 乱敲回答的完全正确
s=s+1可以被执行话,前提条件是x分别等于以下的数:3 6 9 12 15
第一次是:s=s+1,s初始值为0,执行后就是1了,第二次s=s+1,s的原始已变为1了,再加一个1 就是2了.依此类推以上共执行五次也就是等于x=15的时候,s不就等于5了吗?
第二题你是不是想求的是和,而你显示的是循环变量的值啊.n从1变到21,输出n当然会等于21了,你是不是想输出的是 m,把Print n 改成Print m
1.奇数3,9,15怎么求和应该是s = s + x
2.对1,1,2,2,3,3,4,4,5,5,6,6的求和应该是m = m + n