s=“491053”

For i=1 To 3

n=Len(s)

k=1

For j=2 To n

If Mid(s， k， 1) >=Mid(s， j， 1) Then

K=j

Else

Exit For .Exit For表示退出循环

End If

Next j

s= Mid(s， 1， k-1) + Mid(s， k+ 1，n-k)

Next i

Label1.Caption =s

执行该程序段后，标签Label1中显示的值是（  ）

1)对于两个形状相同的矩阵，它们的内积是每个对应位置的数字相乘之后的和；

2)对于小矩阵和大矩阵卷积运算时，以小矩阵为参考，沿着横向和纵向两个方向逐个滑动（取同样大小的矩阵），依次横向和纵向两个方向逐个滑动（取同样大小的矩阵），依次求出内积，得到结果矩阵，如图a所示。

图a

小A同学用VB程序模拟上述的矩阵卷积运算，单击“初始化小矩阵”按钮command1，随机生成小矩阵数据，单击“初始化大矩阵”按钮command2，随机生成大矩阵数据，单击“运算”按钮command3，进行矩阵卷积运算并生成结果矩阵，运行界面如图b所示：

图b

Dima( 1 To 5) As Integer

Dimi As Integer, j As Integer, s As String

s=“”

    For i= 2 To 5

        For j=i To 5

            If j Mod i=0 Then a(j) =a(j)+1

        Next j

    Next i

    For i= 1 To 5

        If a(i) <>1Then s=Str(i) +s

    Next i

    Text 1．Text=S

若数组a的初始值都为0，则运行该程序段后，Text 1中显示的内容为（  ）

Dim a(1 To 6) As Integer

Randomize

a=n Mod k

n=n\k,k=k+1,s=s+a

a(1) = Int(11 * Rnd) + 2

For i = 2 To 6

a(i) = Int(11 * Rnd) + 2

If i Mod 2 = 1 And Not prime(a(i)) Then i = i - 1

ElseIf Not prime(a(i)) Then a(i) = a(i) + a(i - 1)

End If

Next i

'自定义函数 prime()用于判断参数是否为质数，prime(n) = True 则说明 n 为质数，否则为合数，定义函数代码略执行该程序后，a(1)～a(6)的值不．可．能．为（  ）