
请大家帮我用VB语言编一个从1-100等差数列的和的程序,还想要个流程图,希望各位高手帮个忙!
5个回答
展开全部
楼上算法需要至少100次运算,若直接使用
dim s as integer
s=(1+100)*100/2
print s
则只需一次加法,一次乘法,一次除法,算法效率不可同日而语。
若您需要学算法设计,请无视;若您要解决实际问题,请重视!
dim s as integer
s=(1+100)*100/2
print s
则只需一次加法,一次乘法,一次除法,算法效率不可同日而语。
若您需要学算法设计,请无视;若您要解决实际问题,请重视!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
dim i as integer,s as integer
for i=1 to 100
s=s+i
next i
print s
for i=1 to 100
s=s+i
next i
print s
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用公式 S = A1*N + N(N-1)*D/2
其中A1为首项,N为项数,D为公差
例如 1,2,3,……,100
s=1*100 + [10*(100-1)*1]/2=100+990/2=595
其中A1为首项,N为项数,D为公差
例如 1,2,3,……,100
s=1*100 + [10*(100-1)*1]/2=100+990/2=595
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
dim i as integer
for i=1 to 100
text1.text=val(text1.text)+i
next i
流程图不会画
for i=1 to 100
text1.text=val(text1.text)+i
next i
流程图不会画
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
什么叫流程图?是界面截图吗?百度HI留言
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询