网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
执行下列程序段后，x的值为（）。 x = 10 For i = 1 To 5 For j = 1 To 5 Step 2 x = x - 1 Next j Next i
A．-5
B．5
C．10
D．0
参考答案和解析
-5
更多 “执行下列程序段后，x的值为（）。 x = 10 For i = 1 To 5 For j = 1 To 5 Step 2 x = x - 1 Next j Next iA．-5B．5C．10D．0” 相关考题
考题
执行以下程序段 Dim i As Integer,X As Integer x=0 For i=20 To 1 Step -2 x=x+i\5 Next Print x 后,x的值为______。A． 16B．17C．18D．19
考题
下列程序段的执行结果为 ______。 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) Pring"A(5)="；A(5)A．A(5)=5B．A(5)=10C．A(5)=20D．A(5)=40
考题
下列程序段的执行结果为 ______。 Dim m(3，3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer For i=1 To 3 m(i，i)=i Next For i=0 To 3 For j=0 To 3 x=x+m(i，j) Next Next Print xA．3B．4C．5D．6
考题
阅读下列程序段：x = 0For i = 1 To 4For j = 1 To ix = x + 1Next j, i执行以上循环后，x 的值为( )。A、 6B、 9C、 10D、 16
考题
（10）假设有下列程序段： For i=1 To 3 For j=5 To 1 Step -1 Print i*j Next j Next i则语句Print i*j的执行次数是，i的值为______，j的值为______。
考题
下列程序的执行后,X的结果为()。 Private Sub Command1_Click( ) x=0 For i=1 to 3 x=1 For j=1 to 4 x=2 For k=1 to 5 x = x ＋ 2 Next k Next j Next i Print x End Sub
A. 12B. 24C. 36D. 48
考题
假定有下列程序段 For i=1 TO 3 For j=5 TO 1 Step-1 Print i*j Next j Next i 则语句Print i*j的执行次数是（ ）。A.15B.16C.17D.18
考题
下列的程序段执行后，X的值为______。 K=0 For i=1 To 10 For j=i To 10 x= x + 1 Next j Next iA．50B．55C．100D．105
考题
执行以下程序段Dim x As Integer，i As Integerx＝0For i=20 To 1 Step-2 x＝x+i\5Next i后,x的值为A．16B．17C．18D．19
考题
下列程序段的输出结果为( )。 Dim M(5,5), S(5) For i = 1 To 5 S(i) = 0 For j = 1 To 5 M(i, j) = i + j S(i) = S(i) + M(i, j) Next j Next i For Each x In S Print x; Next xA．2023 24 3540B．2025 30 3540C．2023 25 35 40D．2025 354045
考题
执行以下程序段 Dim x As Integer， i As Integer x=0 For i=20 To Step -2 x=x+i\5 Next i 后，x的值为A．16B．17C．18D．19
考题
下列程序段的输出结果为( )。 Dim M(5, 5), S(5) For i=1 To 5 S(i)=0 For j=1 To 5 M(i, j)=i+j S(i)=S(i)+M(i, j) Next j Next i For Each x In S Print x; Next xA．20 23 24 35 40B．20 25 30 35 40C．20 23 25 35 40D．20 25 35 40 45
考题
当Form_Click;事件发生时,窗体上显示的第三行是 ______。 Private Sub Form_Click() Dim i As Integer, j As Integer, k As Integer Dim x(5, 5) As Integer For i = 1 To 5 k = 1 For j = 1 To 5 If i ＜= j Then x(i, j) = k + 1 k=k+2 Else x(i, j) = k + 1 End If Next j Next i For i = 1 To 5 For j = 1 To 5 Print x(i, j) Next j Print Next i End SubA．22135B．21357C．22213D．13579
考题
下列的程序段执行后，x的值为______。Private Sub Command1_Ciick() x =0 for i =1 To 10 for j = i To 10 x=x+1 Next j Next i Print xEnd SubA．50B．55C．5D．105
考题
下面的程序段执行后，X的结果为______。 X=0 For I=1 to 5 For j=I to 5 X=X+1 Next j Next I Print xA． 5B．10C．15D．20
考题
下列程序段的执行结果为______。 Dim m(3,3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer For i=1 To 3 m(i,i)=i Next For i=0 T0 3 For j=0 To 3 x=x+m(i, j) Next Next Print xA．3B．4C．5D．6
考题
下列程序段的执行结果为 ______。 Dim m(3，3)As Integer Dim i As Integer Dim j As Integer Dim K As Integer For i=1 To 3 m(i,i)=i Next For i=0 To 3 For j=0 To 3 x=x+m(i，j) Next Next Print xA．3B．4C．5D．6
考题
下列程序段的输出结果为( )。 Dim M(S, S), S(5) For i=1 To 5 S(i)=0 For j=1 To 5 M(i, j)=i+j S(i)=S(i)+M(i, j) Next j Next i For Each x In S Print x; Next xA．20 23 24 35 40B．20 25 30 35 40C．20 23 25 35 40D．20 25 35 40 45
热门标签
最新试卷