给定任意数a和n，求s=a+a2+a3……an，求大佬们帮忙
vb吧
全部回复
仅看楼主
level 3
贴吧用户_7RGbae2 楼主
给定任意数a和n，求s=a+a2+a3……an，求大佬们帮忙，用下面的程序写[哈哈]
2020年06月07日 10点06分 1
level 8
mijing2000
s=(a+n)/2*(n-a+1)
2020年06月07日 10点06分 2
level 15
初音✨七奈
楼主的意思是不是要求a+a^2+a^3+...+a^n？
如果是的话，可以这样写代码：
a = Val(InputBox(""))
t(0) = 1
For i = 1 To n
t(i) = t(i - 1) * a
s = s + t(i)
Next i
Print s
2020年06月07日 11点06分 3
贴吧用户_7RGbae2
是的，但是老师要里面用到redim t（n）😭
2020年06月07日 12点06分
初音✨七奈
@贴吧用户_7RGbae2 把我写的这些代码加到你那部分代码里就行
2020年06月07日 12点06分
1