VB编程:利用For循环,计算1-N的奇、偶数之和,其中N为自然数.窗体界面的设计要求,如图
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/25 23:03:46
VB编程:利用For循环,计算1-N的奇、偶数之和,其中N为自然数.窗体界面的设计要求,如图
请输入要计算的数:XXXXXXXXX
奇数和:XXXXXXX
计算
偶数和:XXXXXXXXX
请输入要计算的数:XXXXXXXXX
奇数和:XXXXXXX
计算
偶数和:XXXXXXXXX
![VB编程:利用For循环,计算1-N的奇、偶数之和,其中N为自然数.窗体界面的设计要求,如图](/uploads/image/z/8164848-48-8.jpg?t=VB%E7%BC%96%E7%A8%8B%EF%BC%9A%E5%88%A9%E7%94%A8For%E5%BE%AA%E7%8E%AF%2C%E8%AE%A1%E7%AE%971-N%E7%9A%84%E5%A5%87%E3%80%81%E5%81%B6%E6%95%B0%E4%B9%8B%E5%92%8C%2C%E5%85%B6%E4%B8%ADN%E4%B8%BA%E8%87%AA%E7%84%B6%E6%95%B0.%E7%AA%97%E4%BD%93%E7%95%8C%E9%9D%A2%E7%9A%84%E8%AE%BE%E8%AE%A1%E8%A6%81%E6%B1%82%2C%E5%A6%82%E5%9B%BE)
ivate Sub Command17_Click()
Dim i As Long,k As Long,j As Long,o As Long
k = Val(Text1.Text)‘要计算的数
j = 0
o = 0
For i = 1 To k
If i Mod 2 = 0 Then
o = o + i
Else
j = j + i
End If
Next
Text2.Text = j'奇数和
Text3.Text = o’偶数和
End Sub
再问: 嗯 麻烦了 谢谢!
Dim i As Long,k As Long,j As Long,o As Long
k = Val(Text1.Text)‘要计算的数
j = 0
o = 0
For i = 1 To k
If i Mod 2 = 0 Then
o = o + i
Else
j = j + i
End If
Next
Text2.Text = j'奇数和
Text3.Text = o’偶数和
End Sub
再问: 嗯 麻烦了 谢谢!
VB编程:利用For循环,计算1-N的奇、偶数之和,其中N为自然数.窗体界面的设计要求,如图
设计一个窗体,要求输入一个正整数N,计算并输出N的阶乘.VB的
VB DO循环 1.N的阶乘N!2.2-100之间所有偶数 3.前10个自然数之和、积.
VB编程计算下列公式的值,其中n (
计算n个电阻并联后的阻值(其中n的值由文本框输入,n个不同的阻值通过循环控制输入.电脑编程 vb 代码
用VB计算N!分别用while和for循环语句计算N!(N由界面输入)
VB编程:编递归函数过程,计算1+2+3……..+n的值(n是自然数)
Vf编程计算自然数n的阶乘
利用for循环嵌套编写程序,计算1!+2!+3!+……+n!,要求n的值要由键盘输入 一定要用嵌套
我想知道,用vb编程,生成10个0-100之间的随机数,要求分别求出其中所有基数之和以及所有偶数之和,该怎么
用matlab求for 循环计算1至100之间的奇数之和及偶数之和.
C语言程序 编一函数,计算正整数1~n中的奇数之和和偶数之和,要求函数的原型为long sum(int x) .