首页/ 题库 / [单选题]程序段: x=0 For a=1 to 的答案

程序段: x=0 For a=1 to 5 step 2 x=x+a^2 Next a Print a 语句x=x+a^2执行的次数和最后a的值分别为 ______。

单选题
2022-11-21 21:52
A、3 7
B、2 5
C、3 5
D、2 7
查看答案

正确答案
C

试题解析
解析:当循环变量的值在变化方向上超过终值时程序跳出For循环体。本题循环变量a初值为1,终值为5,步长为2,因此在a=1、3、5时分别执行一次循环。当a=7时超过了终值5,循环结束,因此答案为C。

标签:
相关题目
X~U(a,b)(a>0),且P{04}=1/2,则P{1
执行下面的程序段,x的值为 Private Sub Command1_Click( ) For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End Sub
单击一次命令按钮之后,下列程序段的执行结果为( )。 Pubic Sub Proc(a()As Integer) Static i As Integer Do a(i)=a(i)+a(i+1) i=i+1 Loop While i<2 End Sub Private Sub Command1_Click() Dim m As Integer,i As Integer,x(10)As Integer For i=0 To 4:x(i)=i+1:Next i For i=1 To 2:CallProc(x()):Next i For i=0 To 4:Print x(i);Next i End Sub
单击一次命令按钮之后,下更程序代码的执行结果为______ 。 Public Sub Proc(a() As Integer) Static i As Integer Do a(i) = a(i) + a(i + 1) i=i+1 Loop While i < 2 End Sub Private Sub Command1_Cliek() Dim m As Integer Dim i As Integer Dim x(10) As Integer For i = 0 To 4 x(i) = i + 1 Next i For i = 1 To 2 Call Proc (x) Next i For i = 0 To 4 Print x(i); Next i End Sub
下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer,y(5) As Integer For i=1 to 10 x(i)=10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub
下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x (10)As Integer,y(5)As Integer For i=1 to 10 x(i)=10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub
执行下面的程序后,输出的结果是 K=1 For j=1 To 4 X=X - 1: y=0 For k=1 To 4 X=X + 1: y=y + 1 Next k Next j Print X;y
下列程序段的执行结果为______。Dim A(10),B(5) For i=1 To 10 A(i)=i Nex i For j=1 To 5 B(j)=j*20 Next j A(5)=B(2) Print "A(5)=";A(5)
下列程序段的执行结果为 For X=5 To 1 Step -1 For Y=1 To 6-X Print Tab(Y+5);"*"; Next Print Next
下列程序段的执行结果为______。 For x=5 To 1 Step-1 For Y=1 To 6-x Print Tab(Y+5);"*"; Next Y Print Next x
下列程序段的执行结果为( )。 ForX=5 To 1 Step-1 For Y=1 To 6-X Print Tab (Y+5);"*" Next Y Print Next X
下列程序段的执行结果为______。 For X=5 To 1 Step-1 For Y=1 To 6-x Print Tab(Y+5);"*" Next Y Print Next X
有下列程序段: For i=1 To 4 x=4 For J=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next i ? x 该程序段的执行结果为______。
阅读下面的程序段: For a=1 To 2 For b=1 To a For c=b To 2 i=i+1 Next Next Next Print i 执行上面的3重循环后,i的值为
下列程序段的执行结果为 ______。 Dim A(10),B(5) For i=1 To 10 A(i)=i Next i For i=1 To 5 B(j)=j*20 Next i A(5)=B(2) Print=A(5)= ";A(5)
下列程序段的执行结果为______。 Dim A(10),B(5) For i=1 To 10 A(i)=i Next i For j=1 To 5 B(j)=j*20 Next j A(5)=B(2) Print"A(5)="; A(5)
下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form_Click() Dim x(a)As Integer k=-1 For i=1 To a x(i)=i*k k=(-1)*k Next i For i=1 To 10 Print x(i) Next i End Sub
下列程序的输出结果是( )。 Dim a a=Array(1,2,3,4,5,6,7,8) i=0 For k=100 To 90 Step-2 s=a(i)^2 If a(i)>3 Then Exit For i=i+1 Next k Print k;i;s
下列程序段的执行结果为 a=5 For k=1 To 0 a=a * k Next k Print k;a
执行下面的程序段后,x的值为______。 x=5 For I=1 To 20 Step 2 x=x+I5 Next I
广告位招租WX:84302438

免费的网站请分享给朋友吧