vb编程:求a=1+3+5+.+(2n-1)的值

vb编程:求a=1+3+5+.+(2n-1)的值
Private Sub Form_click()
Dim a As Integer
Dim i As Integer
Dim n As Integer
n = InputBox("n=")
For i = 1 To n
a = a + 2 * n - 1
Next i
Print "n="; n, "a="; a
End Sub
怎么不对呢?
盛夏的椰子 1年前 已收到1个回答 举报

神剑风流 幼苗

共回答了14个问题采纳率:85.7% 举报

for 循环修改下
for i=1 to 2n-1 step 2
a=a+i
next i

1年前

8
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 17 q. 0.047 s. - webmaster@yulucn.com