单项选择题
有如下程序:
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
点击查看答案
相关试题
在窗体上画一个名称为Command1的命令按钮...
在窗体上画一个名称为Command1的命令按钮...