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

Dim a( 1 To 4) As Integer，m As Integer，n As Integer

m=100：n=4

Randomize

For i=1 To n-1

    x=Int(Rnd *n) + 2

    a(i)=m＼x

    m=m-a(i)

Next i

a(i)=m

该程序段运行后，数组a中各元素的值不可能的是（  ）