命令按钮Command1的单击事件过程如下: Private Sub Command1_Click( ) Dim a(10,10)As:Integer x=0 For i=1 To 3

admin2020-08-10  11

问题 命令按钮Command1的单击事件过程如下:
    Private Sub Command1_Click(  )
        Dim a(10,10)As:Integer
        x=0   
        For i=1 To 3
           For j=1 To 3
              a(i,j)=i*2 Mod j
              If x<a(i,j)Then x=a(i,j)
           Next
        Next
        Print x
    End Sub
    执行上述事件过程后,窗体上显示的是(        )。

选项 A、1
B、2
C、3
D、4

答案B

解析 题目中定义了一个二维数组,为数组赋初值并找出这些值中最大的值输出。数组中的值为:
a(1,1)=1*2 mod 1=Oa(1,2)=1*2 mod 2=Oa(1,3)=1*2 mod 3=2
a(2,1)=2*2 mod 1=Oa(2,2)=2*2 mod 2=Oa(2,3)=2*2 mod 3=1
a(3,1)=3*2 mod 1=Oa(3,2)=3*2 mod 2=Oa(3,3)=3*2 mod 3=0
显然最大值为2,因此Print x语句将在窗体上显示2。
转载请注明原文地址:https://kaotiyun.com/show/PvHp777K
0

最新回复(0)