以下程序用于求s=1+(1+2)+(1+2+3)+……(1+2+……100)的和，请补充完该程序。Dim n As IntegerDim i As IntegerDim j As LongDim s As Longn=100j=0s=0For i=1 To【 】J=【 】s=【 】Next iPrint s
题目
以下程序用于求s=1+(1+2)+(1+2+3)+……(1+2+……100)的和，请补充完该程序。
Dim n As Integer
Dim i As Integer
Dim j As Long
Dim s As Long
n=100
j=0
s=0
For i=1 To【 】
J=【 】
s=【 】
Next i
Print s
相似考题
更多“以下程序用于求s=1＋(1＋2)＋(1＋2＋3)＋……(1＋2＋……100)的和,请补充完该程序。 Dim n As Integer Dim i A ”相关问题
-
第1题：
11、下面程序段实现了求1+2+……+100的和：int sum=0; for（int i=1;i＜=100;i++){ sum+=i; }
B -
第2题：
10、下面程序段求1+2+……+100的和 int sum=0; int i=1; while（i＜=100){ sum+=i; }
B -
第3题：
编写一个程序，求出1+（1+2)+（1+2+3)+...+（1+2+3+...+10)之和。
略 -
第4题：
【填空题】在下面的程序段中，对x++语句的频度为 （表示为n的函数） for （i=1;i＜=n;i++) for （j=1;j＜=i;j++) for （k=1;k＜=j;k++) x++； 1+（1+2)+（1+2+3)+ ……+（1+2+3+……+n)=。
C -
第5题：
求s=1+（1+2)+...+（1+2+3..+n)的值，其中n由键盘输入。
当型循环即满足条件就进行循环， 所以I≤n，此时S←S+n，I←n+1 此时条件不满足就退出循环， 从而就表示求S=1+2+3+…+n的和， 故答案为I≤n．