单项选择题

有如下程序:
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 k=2 To 3
Print arr(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
<上一题 目录 下一题>
热门 试题

单项选择题
下列程序段的执行结果为______。 Dim A(4) n=3 A(1)=1 For k=0 To n-1 For 1=1 To k+1 X=k+2-1 A(X)=A(X)+A(X-1) If k<n-1 Then Exit For Print A(X); Next 1 Next k
A.1 2 1
B.1 2 3
C.2 4 6
D.1 3 1
单项选择题
有如下程序: infocase$=InputBox( Input one letter: ) Select Case infocase$ Case a grade$= Very good Case b grade$= good Case c grade$= OK Case d grade$= Qualified Case Else grade$= Bad End Select Print grade$ 运行时从键盘上输入英文小写字母d后,输出的结果是______。
A.Very good
B.Good
C.Bad
D.Qualified
相关试题
  • 以下程序的功能是:生成20个200到30...
  • 定义动态数组需要分两步进行,首先在模块级...
  • 下列程序的输出结果为______。 Sub...
  • 以下程序的功能是:从键盘上输入若干个学生...
  • 下列程序用IIf函数改写为______。 x...