1. (2020高三下·金华月考) 有如下VB程序段：

Dim i As Integer, j As Integer, a(1 To 5) As Integer

For i =1 To 5

 a(i)=Int(Rnd*5+1)

 For j = 1 To i-1

   If a(i)=a(j) Then

    i=i-1 : Exit For

   End If

 Next j

Next i

执行程序后,数组中的数据可能是（  ）