55问答网
所有问题
vb中1到100的偶数和是多少
如题所述
举报该问题
其他回答
第1个回答 2015-10-26
Private Sub Command1_Click()
Dim sum As Integer
For i = 2 To 100 Step 2
sum = sum + i
Next i
Print "所求偶数之和为:" & sum
End Sub
本回答被网友采纳
相似回答
VB
编写程序,在窗体的加栽事件中,计算
1到100
之间所有
偶数的和
答:
n = 0 For i = 2 To 100 Step 2 '不包刮100,就改成99 n = n + i Next msgbox "
1到100
之间所有
偶数的和
为:” & n End Sub 还是这样效率要高一点点,循环次数少了一半,循环内还不用判断
用
VB
求
1到100
间所有
偶数和
答:
之后按下F5键即可在程序默认窗体
的
标题栏中看到
1到100
间所有
偶数和
编写程序,求1-
100
之间
的
奇数和
偶数
之和,并加以输出。
答:
for(i=1;i<=
100
;i++)if(i%2==0) s1+=i;else s2+=i;printf("
偶数和是
:%d\n奇数和是:%d\n",s1,s2)}
求
VB
编程1~
100的偶数和
答:
Private Sub Form_Click()Dim i, sum As IntegerFor i = 1 To 100If i Mod 2 = 0 Then sum = sum + iNextPrint "1~
100的偶数和
="; sumEnd Sub
用
VB
编写:循环语句的应用,计算1~
100的偶数和
?
答:
用
VB
编写:循环语句的应用,计算1~
100的偶数和
,最简单的方法是采用计数循环来实现。dim i as integer,s as integer s=0 for i = 2 to 100 step 2 s = s + i next i print "Sum ="; s
大家正在搜
3到9中偶数有多少个奇数有多少个
在一到20中最小的偶数是多少
vb计算1到100的偶数和
1到100中的偶数是都有谁
1到100中有几个奇数有几个偶数
0到20中最小的偶数是几
求100以内的偶数之和vb
1到100中有几个偶数
在1到20各数中偶数有几个
相关问题
求VB编程1~100的偶数和
编程 计算1到100的偶数的和?
VB编写程序,在窗体的加栽事件中,计算1到100之间所有偶数...
VB编程:求1到100之间的偶数,并输出所有的偶数,每五个一...
用VB 求 1到100的奇数和 和 偶数和的函数怎么写
“1到100的奇数”的和是多少?偶数是多少?
请求高手解答我VB问题 题目是:输出1到100之间的所有偶数...
用vb算1至100内所有偶数,所有奇数,所有数的和