
写出1+2+3+…+100的一个算法,并画出流程图和写出算法语句。 30
展开全部
解:算法:
第一步:输入x=1
第二步:计算1+2
第三步:计算1+2+3
.。。。。。。。。。
。。。。。。。
流程图:
开始
s=0,i=1
i<=100
输入一个N
累加s=s+n
计数一次:I= I+1
输出s
结束
注:图中有两条线没有画,你可以自己补上的
算法语句:VB
Private Sub Form_Click()
Dim s As Single, n As Integer, i As Integer
s = 0
n = Val(InputBox("输入n:"))
For i = 1 To n
s = s + 1
Next i
Print s
End Sub
第一步:输入x=1
第二步:计算1+2
第三步:计算1+2+3
.。。。。。。。。。
。。。。。。。
流程图:
开始
s=0,i=1
i<=100
输入一个N
累加s=s+n
计数一次:I= I+1
输出s
结束
注:图中有两条线没有画,你可以自己补上的
算法语句:VB
Private Sub Form_Click()
Dim s As Single, n As Integer, i As Integer
s = 0
n = Val(InputBox("输入n:"))
For i = 1 To n
s = s + 1
Next i
Print s
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
C语言
i=1,
s=i
if(i<101)
i=i+1,s=s+i
endif
print(s)
i=1,
s=i
if(i<101)
i=i+1,s=s+i
endif
print(s)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
1+2+3+…+100=(1+100)x50=5050
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
1+2+3+3+2+1+1+2+3+4+5+6+7+7+8+8+7+9+10+10=100
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询