下列程序段的执行结果为_________。 Dim A(10)，B(5)For i=1 To 10 A(i)=i Next i For j=1 To 5 B(j)=j*20 Next j A(5)=B(2) Print"A(5)="；A(5)

有如下程序，输出结果为( )。 Private Sub Form_Activate() Dima a=Array(1,2,3,4,5) Fori=LBound(a)To UBound(a) a(i)=i*a(i) Nexti Printi，LBound(a)，UBound(a)，a(i) End Sub 阅读程序： Option Base 1 Private Sub Form_Click（) Dima（3)As Integer Print"输入的数据是:"； Fori=1 To 3 a（i)=InputBox（“输入数据”) Printa（i)； Next Print If a（1)＜a（2) Then t=a（1) a（1)=a（2) a（2)= [10] End If Ifa（2)＞a（3)T 下列段的执行结果为（）Dim A（），B（）FOr I=1 To 10 A（）=I Next I For J=1 To 5 B（）=J*20 Next J A（）=B（）Print "A（）="；A（） 设执行以下程序段时依次输入11、33、55,执行结果为.Dima（4）AsInteger,b（4）AsIntegerForK=0To2a（K+1）=Val（InputBox（请输入数据））b（3-K）=a（K+1）NextKPrintb（K）（） 下列程序段的执行结果为I=1x=5 下列VB程序段运行后，变量T的值是（）。A=10 : B=5 : T=0IF A＞B THEN T=AELSE T=BEND IF 下列程序段的执行结果为（)。 a=1 b=2 For I=1 To 3 f=a * b a=b b=f Print f Next I 下列程序段的执行结果为（）。 a=3 b=1 For I=1 To 3 f=a + b a=b b=f Print f Next I 下列段的执行结果为____ a=0：b=1 DO a=a+b b=b十1 Loop While a<10 Print a；b 下列段的执行结果为（）A=0：B=1 DO A=A+B B=B+1 Loop While A<10 Print A；B 下列程序段的运行结果是a=0;b=1;Do;a=a+b;b=b+1;LoopWhilea<10;Printa;b（） 下列程序段的输出结果为(). int a=7,b=9,t; t=a*=a>b?a:b; printf("%d",t); 下列程序段的执行结果为a=1b=1For I=1 To 3　f=a+b　a=b　b=f　Print f;Next I 下列程序输出结果（）。PrivateSubCommand1_Click（）Fori=1To10GetValueiNextiPrintGetValue(i)EndSubPrivateFunctionGetValue(ByValaAsInteger)StaticSAsIntegerS=S+aGetValue=SEndFunction 执行下述程序段后, a,b的值分别是 。int a,b;for（b=1,a=1;b=10） break; if（a%2==1） { a+=5; continue; } a-=3;}（） 下列程序段的执行结果为（)。 Dim t（10) For k=2 To 10 t（k) =11 - k Next k X=6 Print t（2+t（x)) 有程序段： int *p,a=10,b=1; p=&a; a=*p+b; 执行该程序段后，a的值为 下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dimx(10) ForI=1 to 10x(i)=10-I+1 Next I ForI=10 to 1 step-2Printx(i)； NextI End Sub 下列程序执行的结果是【】 a=1;b=2;c=3; while(a 执行下列程序段，输出结果是_。a = 30b = 1if a >=10: a = 20elif a>=20: a = 30elif a>=30: b = aelse: b = 0print（‘a=%d, b=%d’%（a,b））（）