用VB设计一个求s=1+(1+2)+(1+2+3)+(1+2+3+4)+...+(1+2+3+4+...+n)的程序
1个回答
展开全部
dim S,S1,I,J,n as long
n=clng(text1)
s=0
for i=1 to n
s1=0
for j= 1 to i
s1=s1+j
next j
s=s+s1
next i
text2=s
n=clng(text1)
s=0
for i=1 to n
s1=0
for j= 1 to i
s1=s1+j
next j
s=s+s1
next i
text2=s
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
