问题详情

下面程序运行后，输出的结果是 Dim arr(3,3) For j=1 To 3 For k=1 To 3 Arr(j,k)=(j-1)*3+k Next k Next j For j=2 To 3 For j=2 To 3 Print art(k,j)； Next k Print Next j

A、2 5 3 6

B、5 8 6 9

C、4 7 5 8

D、5 9 6 8

时间：2021-12-31 22:46 关键词：

答案解析

B
解析：依题意，声明一个三行三列的数组，并用嵌套for循环赋值如下： arr(1,1)=1 arr(2,1)=4 arr(3,1)=7 arr(1,2)=2 arr(2,2)=5 arr(3,2)=8 arr(1,3)=3 arr(2,3)=6 arr(3,3)=9 最后用Print函数输出arr(2,2)，arr(3,2)，空行，arr(2,3)，arr(3,3)。

相关问题

有以下程序 main() { int x[]={1，3，5，7，2，4，6，0)，i,j，k； for (i=o; i＜3; i++) for(j=2；j＞=i；j--) if(x[j+1]＞x[j]){k=x[j]； x[j]=x(j+1)； x[j+1]=k； } for(i=0；i＜3；i++) for(j=4；j＜7-i；j++) if(x[j]＞x(j+1]) { k=x[j]； x[j]=x[j+1]； x[j+1]=k； } for (i=0；i＜8；i++) printf("%d"，x[i])； printf(" ")； } 程序运行后的输出结果是______。
有以下程序： #include ＜stdio. h＞ main ( ) { int x[ ] = {1,3,5,7,2,4,6,0} ,i,j,k; for(i =0;i＜3;i ++ ) for (j =2;j＞ = i;j — ) if( x[j + 1 ] ＞ x[j] ) { k = x[j] ;x[j] = x[j + 1 ] ;x[j + 1 ] = k; } for (i =0;i＜3;i++) for(j =4;j ＜7-i;j ++) if(x[j] ＞x[j+1]){ k=x[j];x[j] =x[j+1];x[j+1] =k;} for (i=0;i＜8;i ++) printf("%d" ,x[i]); prinff(" " );}程序运行后的输出结果是( )。
有以下程序： main() { int x[]={1,3,5,7,2,4,6,0},i,j,k; for(i=0;i＜3;i++) for (j=2;j＞=i;j--) if (x[j+1)＞x[j]){k=x[j];x[j];x[j+1);x[j+1]=k;} for (i=0;i＜3;i++) for (j=4;j＜7-i;j++) if (x[j]＞x[j+1]){k=x [j];x[j]=x[j+1];x[j+1)=k;} for(i=0;i＜8;i++)printf("%d",x[i]); printf(" "); } 程序运行后的输出结果是 ______。
有如下程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 arr=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arE(i)/3=arr(i)3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。
阅读程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 art=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arr(i)/3=arr(i)3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。