1樓:匿名使用者
private sub command1_click()dim i as integer, s as integeri = 1
s = 0
while i <= 99
s = s + i
i = i + 2
wend
msgbox "s=1+3+5+...99" + str(s)end sub
你應該是用i來控制迴圈,用s來求和,如果你用s=i+1,那你求的只是一個數,s沒有儲存
2樓:匿名使用者
sub madd()
dim i, ss
for i = 1 to 99 step 2ss = ss + i
next
msgbox "1 to 100 奇數和是: " & ssend sub
3樓:匿名使用者
44444444444444444444444444444
4樓:施忠祖平卉
private
subcommand1_click()
dimsum
aslong
dimi
aslong
fori=1
to100
step
2sum
=sum+i
next
iprint
sumend
sub2500
編寫求1到100之間奇數的和。用vb語言。 10
5樓:匿名使用者
private sub command1_click()dim i, sum1, sum2 as integersum1 = 0
sum2 = 0
for i = 1 to 100
if i mod 2 = 1 then
sum1 = sum1 + i
else
sum2 = sum2 + i
end if
next i
print "奇數
bai和du為zhi" & sum1
print "偶數
dao和為" & sum2
end sub
6樓:匿名使用者
private sub form_click()dim i as long
dim sum as long
sum = 0
for i = 1 to 100 step 2sum = sum + i
next i
print sum
end sub
利用迴圈語句 用vb計算1到100的奇數的和
7樓:微標印象
private sub command1_click()dim i as integer
dim s as integer
for i = 1 to 100
if i mod 2 <> 0 then
s = s + i
end if
next
msgbox s
end sub
用c語言for迴圈求1到100之和
sum sum i 這一句寫在了for迴圈的外面,意思就是先作for迴圈至i 101,最後執行sum sum i,輸出為101。更改,把sum sum i寫到迴圈裡面。include int main void printf d sum 直接累加 即可。include int main includ...
1到100的質數有那些,1到100的質數和合數有哪些
100以內的質數共有25個,這些質數我們經常用到,可以用下面的兩種辦法記住它們。一 規律記憶法 首先記住2和3,而2和3兩個質數的乘積為6。100以內的質數,一般都在6的倍數前 後的位置上。如5 7 11 13 19 23 29 31 37 41 43 只有25 35 49 55 65 77 85 ...
第1到第100的英語,1 100用英語怎麼說
第1.first 2.second 3.third 4.fourth 5.fifth 6.sixth 7.seventh,8.eighth 9.ni h 10.tenth 11.eleventh 12.twelfth 13.thirteenth 14.fourteenth,15.fifteenth ...