vb 如何计算a+2b+3c+4d+5e的值以及显示计算式?(上述字母的值都已知)
题目
vb 如何计算a+2b+3c+4d+5e的值以及显示计算式?(上述字母的值都已知)
用循环的方式
答案
Dim s(1 To 5), z As Integer
Dim sStr, zStr As String
Dim i As Integer
sStr = "abcde"
For i = 1 To 5
s(i) = InputBox("请输入" & Mid(sStr, i, 1) & "的值:")
If i > 1 Then
zStr = zStr & "+" & s(i) & "*" & i
Else
zStr = s(i)
End If
z = z + s(i) * i
Next i
MsgBox "a+2b+3c+4d+5e=" & zStr & "=" & z
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 云的形成和降水
- Many people commplain of the rapid ___ of modern life.
- 一台拖拉机2小时更低1.5公顷.照这样计算,8小时可以耕地多少公顷?解比例
- 上下结构上明下空念什么
- 一个物体放在光滑的水平面上,在恒力作用下从静止开始运动,若用t表示运动时间,s表示运动的位移,这下列叙述中正确的是的()
- 初中生3年语文应达到多少字的阅读量
- 简答题:矛盾的普遍性和特殊性的含义及其辩证关系
- 我的榜样 英语作文
- 不等式1+4X>2-3X的两边都加上__得7X>1,依据是__.
- 安得广厦千万间,大避天下寒士俱欢颜,这句话的详细意思怎么解释,请详细一点,
热门考点