执行以下程序段Dim i As Integer,X As Integerx=0For i=20 To 1 Step －2 x=x＋i5NextPrint x后,x

（12）下列程序段的运行结果是 Sub sele（) Dim n As Integer I=21:n=3 Do While i>n I=i－n Loop

程序段如下:Dim i As Integer s As IntegerFor i=4 To 1 Step-1 s=s+iNext iPrint s i执行的结果

Dim x As Integer x = True Print x 执行以上程序段后 输出结果为()

执行以下程序段 Dim x As Integer i As Integer x=0 For i=20 To 1 Step-2 x=x

设执行以下程序段时依次输入2 4 6 执行结果为 Dim a(4)As Integer Dim b(4)AS Integer For k=

设执行以下程序段时依次输入2 4 6执行结果为Dim a(4) As Integer b(4) As IntegerFor k =0 To 2a