我想知道,用vb编程,生成10个0-100之间的随机数,要求分别求出其中所有基数之和以及所有偶数之和,该怎么
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/10 14:43:49
我想知道,用vb编程,生成10个0-100之间的随机数,要求分别求出其中所有基数之和以及所有偶数之和,该怎么
Private Sub Command1_Click()
Dim oushu%,danshu%,sum%
oushu = 0
danshu = 0
For i = 1 To 10
Randomize
sum = Int(Rnd * 100)
If sum Mod 2 = 0 Then
oushu = oushu + sum
Else
danshu = danshu + sum
End If
Next i
Text1.Text = oushu
Text2.Text = danshu
End Su
Dim oushu%,danshu%,sum%
oushu = 0
danshu = 0
For i = 1 To 10
Randomize
sum = Int(Rnd * 100)
If sum Mod 2 = 0 Then
oushu = oushu + sum
Else
danshu = danshu + sum
End If
Next i
Text1.Text = oushu
Text2.Text = danshu
End Su
我想知道,用vb编程,生成10个0-100之间的随机数,要求分别求出其中所有基数之和以及所有偶数之和,该怎么
C语言 编程实现计算1—100之间计算总和是多少,所有的奇数之和以及偶数之和.
有一个正整数组,包含n个元素,要求编程求出其中所有素数之和以及所...
从键盘上输入10个整数,并求出这10个数中所有奇数的和与所有偶数之和要求:分别用while,do ...while
VB DO循环 1.N的阶乘N!2.2-100之间所有偶数 3.前10个自然数之和、积.
求出1到100的自然数系列中能被3整除的所有数之和,并在文本框中输出结果,请编程 (要求用VB程序写)
随机产生并显示10个1~10之间的整数,分别求出其中的所有奇数之和和偶数之积 .利用For/Next、Do/Loop两种
用while语句求出100以内的所有奇数之和和偶数之和
在VB中输入一个大于等于1的整数,然后分别计算从0到该数之间的奇数之和和偶数之和程序怎么编?
vb 编程 计算100~300之间所有能被3和7整除的数之和,求代码
在VFP上用DO WHILE语句输出100以内所有偶数以及所有偶数的和,所有奇数以及所有奇数之和.
编写程序,求出3到100之间的所有非偶数非素数的数之和.速求!