主观题

for(i=1;i<9;i+=1);,该循环共执行了(  )次

查看答案
该试题由用户478****18提供 查看答案人数:29880 如遇到问题请 联系客服
正确答案
该试题由用户478****18提供 查看答案人数:29881 如遇到问题请联系客服

相关试题

换一换
单选题
执行语句Fori=1To3.i=i+1.Nexti后,变量i的值是()
A.3 B.4 C.5 D.6
答案
单选题
以下程序的运行结果是()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
答案
单选题
下列程序运行时输出的结果是( )。 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 3579 B.975 3 1 C.1234567 89 10 D.1098765432 1
答案
单选题
下列程序段的执行结果为.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
答案
单选题
有以下程序#includvoifun(in*s)statiinj=0;ds[j+sj+1]while(j<2);}main()inia[10]={1,2,3,4,5};fori=1i<3i+fun);fori=1i<5i+printf("%d",a[i]);printf("")}程序运行后的输出结果是()
A.5745 B.34756 C.5795 D.35745
答案
主观题
在窗体上画1个命令按钮,其名称为Command1,然后编写如下事件过程: PriVate Sub Commandl_CUck() Dimalt(1 To 100)As Integer Fori=1 To 100 arr(i)=Int(Rnd*1000) Nexti Max=arr(1) Min=arr(1) Fori=1 To 100If [12] Then Max=arr(i)End IfIf
答案
单选题
执行下列语句后,i和j的值分别为j=0;Fori=1To10Step2;i=i+3;j=j+1;Nexti()
A.10 5 B.11 2 C.11 5 D.14 3
答案
单选题
下列程序输出结果()。PrivateSubCommand1_Click()Fori=1To10GetValueiNextiPrintGetValue(i)EndSubPrivateFunctionGetValue(ByValaAsInteger)StaticSAsIntegerS=S+aGetValue=SEndFunction
A.10 B.65 C.66 D.11
答案
单选题
下面的程序执行完毕后,组合框中数据项的值是()。 Private Sub Form Click() Fori=1 To 6 Combo1.AddItem i Next i For i=1 To 3 Combo1.RemoveItem i Next i End Sub
A.1 5 6 B.1 3 5 C.4 5 6 D.2 4 6
答案
单选题
18,有如下语句,执行后该段语句的循环次数是()。 Dims,i,j as integer Fori=1 to 3Forj=3 to 1 Step-1 s=i*jNextj Nexti
A.9 B.10 C.3 D.4
答案
热门试题
以下程序段的输出结果为( )。  Dim 1,a(10),p(3)  k=5  Fori=0 To 10    a(i)=i  Next i  For i=0 To 2    p(i)=a(i*(i+1))  Next i  For i=0 To 2    k=k+p(i)*2  Next i  Frint k 有如下程序,输出结果为( )。 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 下列程序的输出结果是( )。 Dim a a=Array(1,2,3,4,5,6,7,8) i=0 For k=100 To 90 Step-2s=a(i)^2If a(i)>3 Then Exit Fori=i+1 Next k Print k;i;s 阅读下列程序,写出程序运行结果:【程序1清单】C=”三号教学楼”FORI=1TOLEN(C)/2IFMOD(I,2)=1SUBS(C,2*I-1,2)ENDIFENDFOR 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim a (1 To 10) Dim p(1 To 3) k=5 For i=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2Next i Print k End Sub 程序运行后,单击命 下面程序运行后,输出结果是()。 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 以下程序段中的变量已正确定义fori=0i<4i++,i++)fork=1k<3k++)printf("*");该程序段的输出结果是() 阅读程序: 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 在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码: Private Sub Commandl_Click() Dima(5) Fori=0 To 4A(i)=i+1t=i+1If t=3 Then Print a(i) A(t-1)=a(i-2) Else A(t)=a(i) End If Ifi=3 Thena(i+1)=a(t-4) A(4)=1 Printa(i) 有如下事件过程: Private Sub Form Active () Dim Score (1 to 3) As Integer Dim i As Integer Dim t As Variant Fori=3 To 1 step-1 Score (i) = 2 * i Next For Each t In Score Print t Next End Sub 程序运行后窗体上显示的值为 【1 下面运行程序后,单击命令按钮,输出的结果是______。 Private Sub Commandl_clck() Dim a%(1 To 4),b%(3 To 6),i%,s1,s2 Fori=1 To 4a(i)=i Nexti For i=3 To 6b(i)=i Nexti s1=YAS(a) S2=YAS(b) Printt"s1=";S1"S2=";s2 End Sub Function 程序在运行循环Fori=1to14Step3结束后,的值等于() 如果存在如下过程: Private Function FMax(a()As Integer) Dim First As Integer,Last As Integer,i As Integer First=LBound(a) Last=UBound(a) Max=a(First) Fori=FirSt To Last Ifa(i)>Max ThenMax=a(i) Nexti FMax=Max E 下列程序段的执行结果为______。 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) 有如下程序,该段程序将( )。 Fori=1 to 10 Step0 k=k+2 Nexti 由“Fori:1To9Step-3"决定的循环结构,其循环体将被执行() 下列程序运行后,单击窗体,在窗体上显示:1,1+2,1+2+3,1+2+3+4,1+2+3+4+5的和。请在横线处填写适当的内容,将程序补充完整。 Private Sub Form_Click() Dim i As Integer,tt As Integer Fori=1 To 5 tt=Sum(i):Print "tt=";tt, Next i End Sub Private Function 运行以下程序后,输出的图形是( )。 Forr=O To 150 Circle(320,240),r Fori=1 To 1000 Nexti Nextr 下面程序运行的结果为 1 11 12 21 22 23 31 32 33 34 请在画线处填上适当的内容使程序完整。 Private Sub Form_Click() Call______ End Sub Private Sub Pl6() End Sub Private Sub p16() ForI=1 to 4 Forj=1 to I a=______ Print Tab(j-1)*5+1); 下面程序运行的结果为 1 11 12 21 22 23 31 32 33 34 请在画线处填上适当的内容使程序完整。 Private Sub Form_Click() Call [13] End Sub Private Sub Pl6() End Sub Private Sub p16() ForI=1 to 4 Forj=1 to I a= [14] Print Tab(j-1)*5+1);a;
购买搜题卡 会员须知 | 联系客服
会员须知 | 联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于E考试网网站及系列App

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

    支付方式

     

     

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