高一信息循环结构巩固练习及答案.doc

循环结构练习题1、Visual Basic 程序段如下：该程序段运行后，变量s的值是（ ） s=0 For k=1 To 5 s=s+5 Next k（A） 0 （B） 5 （C） 10 （D） 252、应用计算机程序解决数学问题“求一元二次方程实数解”的步骤，通常是（ ）。 A. 设计算法编写程序B. 编写程序调试程序检测结果C. 分析问题设计算法编写程序调试运行检测结果D. 编写程序调试运行第13题图3、“=”在Visual Basic程序中既可以表示赋值操作，也可以表示关系运算。右图程序段中“=”作用和相同的是ABCD4、用计算机解决问题时，首先应该确定程序“做什么？”，然后再确定程序“如何做？”请问“如何做？”是属于用计算机解决问题的哪一个步骤？（ ）A分析问题 B设计算法 C编写程序D、调试程序5、流程图中表示判断的是（ ）。矩形框菱形框 圆形框椭圆形框6、任何复杂的算法都可以用三种基本结构组成，下列不属于基本结构的是（ ）A顺序结构B选择结构C层次结构D循环结构7、执行完循环语句 For x=1 to 100 step 2 Next x 后，x的值是（ ）A101 B100 C99 D988、下列给出的赋值语句中正确的是（ ）。 A4 = M B-M =M CB=A3 Dx + y = 09、以下程序中的循环体执行的次数是( )。 For A=1 To 100 Step 2 S=S+A Next A Print S A48 B49 C50 D51 10、下列程序代码中，循环体执行的次数是( )。y = 1Do While y = 6 y = y+yLoop A、2 B、3 C、4 D、511、有如下VB程序，其结构为( )。 Dim i As Integer, sum As Doublesum=0For i = 1 To 100 sum =sum+1/iNext iPrint sum= & sumA、顺序结构 B、分支结构 C、循环结构 D、选择结构12、阅读如下VB程序段，运行程序后，当n的值为5时，a的值为_120_。 a = 1 For i = 1 To n a = a * i Next i 13、分析下面的Visual Basic程序，执行后显示的内容分别是（ ）。Dim x as Integer, y as Integer x = 1:y = 0Do While x 3 y = y + x x = x * 3LoopPrint x,y A、3 1 B、3 27 C、20 3 D、3 2114、利用计算机编程解决累加问题，计算1+2+3200的值，我们往往采用（ ）。 A、循环结构 B、选择结构 C、条件结构 D、顺序结构15、在Visual Basic中，分析下面的程序代码：执行后，X的值为：( )。 X = 1Do While X 35 X = (X + 2) * (X + 3)LoopA、168 B、50 C、210 D、016、在Visual Basic中，交换变量x和y的值，正确的赋值语句组是( )。 A、t=x；y=x；y=t B、x=y；y=t；t=x C、x=y；y=x D、t=x；x=y；y=t17、阅读下面程序，窗体上输出的是( )。 Dim i As IntegerDim s As Integer s = 0 For i = 1 To 10 s = s + i Next i Print s, i A、55 11 B、s=55 i=11 C、55 5 D、s=11 i=518、Dim i as integer,sum as integerFor i=1 To 10Sum=Sum+INext iPrint SumEnd 运行结果： 55 19、分析并完善程序：设计程序，输出1-50之内的奇数。Dim i as integer,sum as integerFor i=1 To 50 If i mod 2 0 thenPrint iEnd if Next i End 20、完成下面填空，实现输出如图所示的九九乘法表功能： Dim I As Integer, J As Integer Dim Str As String For I = 1 To _9_ For J = 1 To _i_ Str = Str & & J & * & I & = & I * J _next j_ Print Str Str = Next I21、在VB6.0中，函数Int(-2.9)返回的值是_-3_，函数Abs(-2.9)的值是_2.9_。 22、填空完成下面程序，求n的阶乘，n值由键盘输入。 Dim n as Integer, m as Long , I as Integer n=val(InputBox(“请输入一个整数：”) m=1 for I=1 to _n_ m=_n_*I _next i_ Print m 23、有如下VB程序段，功能是找出100以内的奇数中能被7整除的正整数，并将它们累加起来。Y = 0For i=1 To 100 Step 2If i mod 7 = 0 Then y=y+i Next iPrint Y 24、下面是一段Visual Basic程序，运行该程序后，语句sum=sum+i*(i+1)共执行了_5_次，Text1中最后输出结果是_199_ 。Private Sub Command1_Click( )Dim sum , i As Integer sum = 0 For i = 1 To 9 Step 2 sum = sum + i * (i+1) Next i Text1.Text=sumEnd Sub 25、填空完善程序，求出S=1!+2!+3!+4!+5!+n!的值： S = 0: t = 1 for i = 1 To _n_ t=t*i S = S + t next i26当型循环和直到型循环的区别是_A.当型循环的循环体至少执行一次，直到型循环的循环体可能一次也不执行B.当型循环的循环体可能一次也不执行，直到型循环的循环体至少执行一次C.当型循环和直到型循环的循环体都至少执行一次D.当型循环和直到型循环的循环体都有可能一次也不执行1一小球从10米高空落地，以后每次弹起的高度都要比前一次减少20%，经过多少次后，小球弹起的高度小于0.01米。完成该任务，在流程图空白处应填入_。AH=H*0.2 BH=H*0.8 CH=H*1-0.2DH=10-H*0.82求1+2+4+7+11+16+.的前20项之和。YNi=20?结束输出SS=S+Pi=i+1_开始S=0,P=1,i=1在流程图的空白处应填入_A. p=p+1 B. p=p+iC. p=p+2 D. p=p*23A4以上是二进制数转十进制数的算法，当依次输入4，1，0，1，1时，输出11。在流程图空白处应该填入_。At=a Bb=t Ct=b Da=t5C6找出乘积为399的两个相邻的奇数。YN_结束输出i,i+2i=i+2开始i=1在流程图的空白处应填入_A. i(i+2)399 B. i(i+1)399C. i(i+2)=399 D. i(i+1)=399开始输入NI=NSum0，I1输出Sum结束yn 7求的和。（其中N由键盘输入）。以下填充正确的是( )。 ASumSum+1/ (2*I-1)*(2*I+1)，II+1 BSumSum+1/(2*I-1)*(2*I+1)，II+2 CSumSum+1/ (2*I-1)*(2*I+1)，II+2 DSumSum+1/(2*I-1)*(2*I+1)，II+1该算法的功能是_。A求3+5+7+9的值B求3+2+2+2的值C求1+3+5+7+9的值D求3+5+7+9+11的值该算法的功能是_。A求1+2+3+.+10的和B求1+2+3+10+11的和C10个1累加求和D11个1累加求和该算法的功能是_。A求2+5+8+11+14+17的值B求2+5+8+11+14的值C求2+5+8+11+14+17+20的值D求3+3+3+3+3+3的值11该算法功能是 。A. 求1+2+3+N的值B. 求1+2+3+（N-1）的值C. 求1+2+3+（N+1）的值D. 求1*2*3*N的值该算法的功能是_。A求1+4+7+100的值B求1*4*7*100的值C求1+4+7+97的值D求1*4*7*97的值13该算法功能是 。A. 求1+2+4+8+16的值B. 求1+2+4+8+16+32的值C. 求2+4+8+16+32的值D. 求1+3+9+