以下程序用于求s=1+(1+2)+(1+2+3)+……(1+2+……100)的和,请补充完该程序。 Dim n As Integer Dim i A
以下程序用于求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 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
第1题
以下程序用于求S=1+3+32+33+…+310的值。
Private Sub Commandl_Click()
S=1
T=1
ForI=1 To 10
T=______
S=S+T
NextI
Print"S=";S
End Sub
第2题
A.该程序是死循环
B.该程序用于求1到100之间整数的和
C.该程序用于求1到100之间奇数的和
D.该程序用于求1到100之间偶数的和
第3题
已知数列0,1,1,2,3,5,8,13……(从第3项起每一项为其前2项之和),以下程序用于求数列的第20项,请将程序补充完整。
A=0
B=1
N=2
10 N=N+1
IF N.LE.20 THEN
C=______
A=B
B=C
GOTO 10
ENDIF
PRINT*,C
END
答案是()。
(A) A
(B) B
(C) A+B
(D) C=A
第4题
B、B
C、C
D、D
第5题
A.i<100
B.i<=100
C.i==100
D.i=100
第6题
A.i=50
B.i==50
C.i<50
D.i<=50
第7题
A.i<100
B.i<=100
C.i==100
D.i=100
第8题
A.i=50
B.i==50
C.i<50
D.i<=50
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!