单选题

下列程序段的执行结果为_________。 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)

A. A(5)=5
B. A(5)=10
C. A(5)=20
D. A(5)=40

查看答案
该试题由用户346****31提供 查看答案人数:13028 如遇到问题请 联系客服
正确答案
该试题由用户346****31提供 查看答案人数:13029 如遇到问题请联系客服

相关试题

换一换
主观题
下列程序段的执行结果为______。 DimA(10,10) Fori=2 To 4 Forj=4 To 5 A(i,j)-i*j Next j Next i PrintA(2,5)+A(3,4)+A(4,5)
答案
单选题
以下程序的运行结果是()Subs1(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubCommand1_Click()Dima(1To4)AsIntegerFori=1To4a(i)=i+5Nextis1a()Fori=1To4Printa(i)NextiEndSub
A.12141618 B.6789 C.2468 D.1234
答案
单选题
下列程序段的执行结果为_________。 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)
A.A(5)=5 B.A(5)=10 C.A(5)=20 D.A(5)=40
答案
单选题
下面程序运行后,输出结果是()。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer,I As Integer Callmysub(a(),5) Mysuba
A.5101520 B.2468 C.出错 D.0000
答案
单选题
下列程序段的执行结果为( )。  a=1  b=5  Do   a=a+b   b=b+l  Loop While a
A.1 5 B.12 7 C.a b D.10 25
答案
单选题
下列程序段的执行结果为()。 a=0:b=1 Do a=a+b b=b+1 Loop While a<10 Print a;b
A.10 30 B.a b C.0 1 D.10 5
答案
单选题
下列程序段的执行结果为 A=0: B=1Do A=A+B B=B+1Loop While A<10Print A;B
A.105 B.A B C.01 D.10 30
答案
单选题
下列程序段的执行结果为______。 Dim M(10), N(10) I=3 For T = 1 To 5M(T) = TN(I) = 2 * I + T Next T Print N(I); M(I)
A.3 11 B.3 15 C.11 3 D.15 3
答案
单选题
下列程序段的执行结果为.DimM(2)Fori=lTo2M(i)=0Nextik=2Fori=1TokForj=1TokM(j)=M(i)+1PrintM(k);NextjNexti()
A.1 2 2 3 B.1 2 3 4 C.0 2 2 3 D.0 1 2 3
答案
单选题
有如下程序,输出结果为( )。 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
A.4 0 4 25 B.5 0 4 25 C.不确定 D.程序出错
答案
热门试题
设有程序段: t=6;a=7;b=8; if(a=b)t=a;,这段程序执行后,t的结果是() 阅读程序: 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=3 b=1 For I=1 To 3 f=a + b a=b b=f Print f Next I 下列程序段的执行结果为()。 a=1 b=2 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)) 下列程序运行时输出的结果是( )。 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 有程序段: int *p,a=10,b=1; p=&a; a=*p+b; 执行该程序段后,a的值为 下列程序执行的结果是【】 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))()
购买搜题卡 会员须知 | 联系客服
会员须知 | 联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于E考试网网站及系列App

    只用于搜题看答案,不支持试卷、题库练习 ,下载APP还可体验拍照搜题和语音搜索

    支付方式

     

     

     
    首次登录享
    免费查看答案20
    微信扫码登录 账号登录 短信登录
    使用微信扫一扫登录
    登录成功
    首次登录已为您完成账号注册,
    可在【个人中心】修改密码或在登录时选择忘记密码
    账号登录默认密码:手机号后六位