2017年冬季补考1-5套(算法部分).docx

第 第 PAGE \* MERGEFORMAT 1 页 共 NUMPAGES \* MERGEFORMAT 19 页 2017冬季补考第一套(算法部分) 23、下列选项中，关于算法的描述正确的是（? ）。 ?? A算法只能用自然语言描述 ?? B算法必须在有限步骤内实现 ?? C 算法就是一种高级程序设计语言 ?? D算法可以有0个或多个输入，但只能有一个输出 ? ? 24、下列选项中，能作为VB程序变量名的是（? ）。 ?? A while ?? B 4A123 ?? C a%c ?? D dist ? ? 25、以下程序段执行后，输出结果为（?? ）。 ? m=29 ? If m Mod 3 0? Then ? ? Print? m? ?“不能被3整除” ? Else ? ?Print? m? ? “能被3整除” ? End? If ? A n能被3整除 ? B n不能被3整除 ? C 29不能被3整除 ? D 29能被3整除 ?? 26、下列VB表达式中，值为字符串类型的是（? ）。 ?? (1) Abs(x)?? (2) Text1.Text?? (3)”123+45” (4) Sqr(x)? (5) Labell.Caption ?? A (1)(3)(5) ?? B (2)(3)(5) ?? C (2)(4)(5) ?? D (1)(2)(3) ? ? 27、在VB中，下列哪个选项是正确的赋值语句？（?? ） ???A 2018=x ???B 5s=80 ? C a+b=c ???D s=s+5 28、阅读程序，写出运行结果 ?? Dim n As Integer ?? n=Val(InputBox(“n=”)) ?? Do While n Mod 2=0 ?????? n=n\2 ?? Loop ?? Print n 程序运行时，输入24，输出n的值是：______ 29、分析并完善程序 ?? 以下是计算s=1+6+11+…+101的程序代码，请完善程序。 ???? Dim s As Integer ???? Dim i As Integer ???? s=0 ???? For i=1 To 101 Step__________ ??????? s=____________ ???? Next i ???? Print s 30、算法设计与程序实现 ? ?某市出租车收费标准如下： ???? （1）3公里内（含3公里），收费8元； ???? （2）超过3公里但未超过6公里部分，按1.5元/公里收费； ???? （3）超过6公里部分，按2.25元/公里收费。 ?? 根据以上标准，输入出租车行驶的公里数，请计算顾客需付费多少元？ ?? 【参考代码】 ????? Dim s As Single? ??? ??Dim p As Single ? ????? s=Val(InputBox(“s=”)) ?? ????? If s=3 Then ???????? ??p=8 ????? End? If ????? If ______________Then ?????????? p=1.5*(s-3)+8 ????? End If ????? If s6 Then ?????????? p=2.25*(s-6)+1.5*3+8 ????? End If ????? Print p ? ?? 根据上述回答下列问题： 1、 本题采用的算法是__________（填写：解析法/查找法/枚举法/排序法）。 2、 程序代码中空白处应填写的条件是____________（填写字母：A/B/C/D）. A 3s≦6??? B 3 ≦s≦6? C? s3 And s=6?? D s3 Or s=6 23、设a=2，b=5，在VB中，表达式ab And b3的值是（??）。 A 1 B -1 C False D True 24、以下程序段运行后，x和st的值分别是（??）。 ?Dim? x? As?Integer ?Dim? st? As?String ? x=123+678 ? st=”123”+”678” A?123678??“123678” B?801?????“123678” C?123678???“801” D?801??????“801” 25、用流程图表示条件“AB”是否成立，要用到以下哪个图形？（??） A ?平行四边形 B ?菱形 C ?圆角矩形 直角矩形D? 26、下列选项中，能作为VB程序变量名的是（??）。 A?dim B 3ab C a*b D xy 27、以下程序段运行后，?s的值是（??）。 n=0 s=0 Do?While? s=10 ???????n=n+3 ???????s=s+n loop A