《算法与程序设计》试卷二.docx
实用文案算法与程序设计测试题（二）考试时间：90分钟 满分：100分第一卷、单项选择题：（共20个空，每空2分，共40分）1.卜面关于算法的认识，错误的是。A.算法是解决问题的方法和步骤B.算法有一个或多个的输出C.算法就是计算机程序D .算法的步骤必须是有限的2 .关于数组的说法，下面错误的是。A.同一数组中的数据类型一定相同B.数组元素个数是有限的C.可以定义字符串类型的数组D .同一个程序的数组数据类型一定相同3 .设置窗体标题时，应改变窗体的属性。A.NameB.FontC.BackColorD .Capti on4 .不能使用“ do ”作为变量名的原因是。A.由英文字母开头B后面没有使用数字C使用了英文单词D 使用了关键字5 代数式 - 对应的VB表达式是。A . (a + b)/(c - d)B. (a + b)/c - dC. a + b/(c - d)D . a + b/c - d6 .若变量a的值为34000 ,则变量a的数据类型不可能为A. integerB. longC. si ngle8 该算法包含了 控制结构。A. 顺序结构B 选择结构C.顺序和循环结构D 顺序和选择结构9 在VB语言中，下列正确的赋值语句是。A. a + a = 2B. 3 * a = c - 5C. a = 2 * aD . a + 3 = b10 .在VB中，假定有以下程序段：For i=1 to 3 step 2Print“ VB ”Next i则语句print“ VB”的执行次数是。A . 4B . 3C . 2D . 111 .下面一组语句能令数组的两个元素a(i)与a(j)交换数据的是A . temp=a(i): a(i)=a(j): a(j)=tempB . temp=i: i=j: j=tempC. temp=a(i): a(j)=a(i): a(i)=tempD . temp=a(j): a(i)=a(j): a(j)=temp12 .在VB语言中，表示“ a大于5或b小于0”的正确表达式是<A. 0 < b or a < 5B. a > 5 And b < 0C. a > 5 Or b < 0D . a > 0 And b < 513 .若 a = 4 , b = 5，则运行 Print a; "+" b; "=" a + b的结果是A. 4+5=9B. a+b=9C. a+b=a+bD. 914 .下列循环语句中循环次数无限的是。A . x=0Dox=x+1Loop un tilx>0B .x=1Dox=2*x+1Loop un tilx=3C . x=5Dox=x-2Loop un til x>=3D . x=1Dox=x+2Loop un til x=815 .关于函数与过程的说法，正确的是。A .过程结束时一定要返回一个值B. 过程内一定要定义变量C. 可以在表达式中调用过程D .函数一定要有返回值16 .二分法查找的前提是。A .被查找数据元素个数是奇数B .被查找数据元素个数是偶数C.被查找数据元素是有序的D .被查找数据元素是无序的17.当一个顺序文件通过方式打开以后，才能向此文件写入数据A .for in put或 for outputB . for in put或 for appendC. for output 或 for appendD. 以上都可以18 .用选择排序法对数据7,8,3,9,2从小到大排序，第3趟结果是。A. 2,3,7,9,8B. 3,8,2,7,9C. 3,2,8,7,9D. 3,7,8,9,219 .要从n个数据元素中顺序查找一个元素，最多查找次数是。A. 1B. nC .n/2D . lgn20 .孙子算经上有一道“物不知数”问题：“今有物不知其数，三三数之剩二，五五数之剩三，七七数之剩二。问物几何？”该问题应采用A. 解析法B. 查找法C. 穷举法D .递归算法第二卷、填空题（共10个空，每空3分，共30分）21 .编程计算 s=1*(-2)*3*(-4)*49*(-50)Private Sub Form_Click()Dim s as in teger,i as si ngle s= (1)For i=1 to 50If (2) thens=s*ielses= (3)next iprint s= ;send sub程序中(1)处应填入。程序中(2)处应填入。程序中(3)处应填入22 .某顾客欲将300元全部换成10元、20元、50元的纸币(每种面额至少 1张)，请问有几种换法？Private Sub Form_Click()Dim a as integer,b as integer,c as integer ,n As integer'a,b,c分别代表10,20,50元面额的张数；n代表换法n= ( 1)For a=1 to 30For b=1 to (2)For c=1 to30If (3) then n= (4)Next cNextbNext aprint n= ;nend sub程序中(1)处应填入程序中(2)处应填入程序中(3)处应填入程序中(4)处应填入23 编写递归函数求5 !的值。Public Fun cti on s(n As In teger) As LongIf n = 1 The ns =( 1)Elses =( 2)End IfEnd FunctionPrivate Sub form_Click()'调用递归函数，显示结果Print "s(5)="( 3)End Sub程序中(1)处应填入程序中(2)处应填入程序中(3)处应填入、阅读程序，写出运行后输出的结果：(前两题每题5分，后两题每题10分，共30分),y as single24 .Private Sub Comma nd1_Click() dim x as in tegerx = Rou nd(5.4)Select Case xCase 1 To 5y = 4 + Abs(x)Case 6 To 10y = 50 * xCase ElseEnd SelectPrint yEnd sub25 .Private Sub Comma nd1_Click()Dim m as in teger, n as in tegerDim t As In tegerm = 10n = m * 2t = m * nprint tEnd Sub运行结果:26 .Private Sub Comma nd1_Click()Dim a as in teger, b as in teger, t as in tegerDim ma as integer, mb as integer, n As Integera = 12: b = 8: n = 20t = 0Dot = t + 1ma = t * a Mod nmb = t * b Mod nLoop Un til ma = mbPrint tEnd Sub运行结果:标准文档Private Sub Comma nd1_Click()Dim ml as integer, m2 as integerDim j as integer , a(5) as integerForj = 1 To 5a(j) = In putBox("")Next jm2 = 1m1 = aForj = 2 To 5If a(j) > m1 The nm1 = a(j)m2 = jEnd IfNext jPrint m1Print m2End sub若输入的数分别是237,126, 87, 48, 498 ，则输出结果是什么?运行结果：答案：1.C2.D3.D4.D5.C6.A7.B8.D9.C10.C11.A12.C13.A14.D15.D16.C17.C18.A19.B20.C21.（1）1（ 2）i mod 2=1(3)s*(-i)22. (1) 1(2) 30(或24,或其他通过数学方式推理出来的结果)(3)a*10+b*20+C*50=300( 4)n+123. ( 1)1( 2) s( n-1)* n(3) s(5)24. 925. 20026. 527. 4985
