求1+(1+2)+(1+2+3)+(1+2+3+…+n)+…的值.N的值由文本框输入.用vb语言

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/11 02:27:35
求1+(1+2)+(1+2+3)+(1+2+3+…+n)+…的值.N的值由文本框输入.用vb语言
x){PCm{:,mcdey  { )Mk6gͳm/M~ںTeI/֯}&H. y%Epbl!ls4< JK+4^?{f+ijUUY!p[~E ! ypmLb /K(Je($فB3

求1+(1+2)+(1+2+3)+(1+2+3+…+n)+…的值.N的值由文本框输入.用vb语言
求1+(1+2)+(1+2+3)+(1+2+3+…+n)+…的值.N的值由文本框输入.用vb语言

求1+(1+2)+(1+2+3)+(1+2+3+…+n)+…的值.N的值由文本框输入.用vb语言
Dim i As Integer
Dim s As Integer
Dim T As Integer
Dim n As Integer
n = Val(InputBox("请输入n值;"))
s = 0
T = 0
For i = 1 To n
T = T + i
s = s + T
Next i
Print s