高中信息学业水平考试算法真题.docx

1、高中信息学业水平考试算法真题一、选择题1、设a=2，b=5，在VB中，表达式ab And b3的值是（ ）A、TrueB、FalseC、1D、-12、以下程序段运行后，x和st的值分别是（ ）Dim x As IntegerDim st As Stringx=123+678st=”123”+”678”A、123678 “801”B、801 “123678”C、123678 “123678”D、801 “801”3、用流程图表示条件“AB”是否成立，要用到以下哪个图形？（ ） A B C DA、C B、A C、D D、B4、下列选项中，能作为VB程序变量名的是（ ）A、3ab B、a*bC、di

2、m D、xy5、以下程序段运行后，s的值是（ ）n=0s=0Do while s 3 Then y=2*xElse y=3*x+1End IfA、26 B、10 C、25 D、57、某晚会的猜数字游戏中，有100张写有1100之间整张的卡片，主持人随即抽取一张卡片，让大家竞猜。有一种方案是：第一次猜50，若提示低了，则第二次猜75，若提示还是低了，则第三次猜了87，以此类推：若第一次猜50，提示高了，则第二次猜25，若提示还是高了，则第三次猜12，以此类推：。这种每次缩小一半查找范围而达到迅速确定目标的算法称为（ ）A、解析法 B、二分查找法 C、顺序查找法 D、排序法8、在平面直角坐标系中，

3、设点A（x1,y1）、点B(x2,y2)，则AB两点之间的距离为下图，该公式正确的VB表达式是（）A、 Sqr（(x1-x2)2+(y1-y2)2）B、 Sqr(x1-x2)2+(y1-y2)2C、Sqr(x1-x2)2+(y1-y2)2)D、Sqr(x1-x2)2+(y1-y2)29、下列语句正确定义了一个单精度实型变量x的是（ ）A、其他三项都不对B、Dim x As IntegerC、Dim x As SingleD、Dim x As String10、在VB中表示“x属于区间a,b)”的正确表达式是（ ）。A、a=x Or xbB、a=x And xbC、ax And xbD、a=xb

4、11、在VB中，下列属于字符串常量的是（ ）A、3.14 B、”Visual Basic ” C、cnt D、201812、以下程序段运行后，整型变量s的值是（ ）S=1 For i=1 To 10 Step 3 S=S*iNext iPrint SA、28 B、3640 C、55 D、28013、以下程序段运行后，整型变量max1,min1的值分别是（ ）a=3b=5max1=(a+b)/2+Abs(a-b)/2min1=(a+b)/2-Abs(a-b)/2A、5,5 B、5,3 C、3,5 D、3,314、给定一个四位数的年份，判断它是否为闰年：四年一闰、百年不闰；四百年又闰（年份能被4整

5、除但不能被100整除是闰年，或者年份能被400整除也是闰年。例如2004年和2000年都是闰年，2100年不是闰年）。下列判断年份y是闰年的表达式正确的是（ ）。A、 yMod 4=0 Or y Mod 1000 And y Mod 400=0B、 yMod 4=0C、 yMod 4=0 And y Mod 100 0 Or y Mod 400=0D、 yMod 400=015、将数学表达式转化为VB表达式，下列选项正确的是（ ）。16、下列选项中，关于算法的描述正确的是（ ）A、算法只能用自然语言描述 B、算法必须在有限步骤内实现C、算法就是一种高级程序设计语言 D、算法可以有0个或多个输入

6、，但只能有一个输出 17、下列选项中，能作为VB程序变量名的是（ ）。A、while B、4A123 C、a%c D、dist18、以下程序段执行后，输出结果为（ ）。m=29If m Mod 3 0 Then Print m & “不能被3整除”Else Print m & “能被3整除”End IfA、m能被3整除 B、m不能被3整除 C、29不能被3整除 D、29能被3整除19、下列VB表达式中，值为字符串类型的是（ ）。(1)Abs(x) (2)Text1.Text (3)”123+45” (4)Sqr(x) (5) Labell.CaptionA、(1)(3)(5) B、(2)(3)

7、(5) C、(2)(4)(5) D、(1)(2)(3) 20、在VB中，下列哪个选项是正确的赋值语句？（ ）A、2018=x B、5s=80 C、a+b=c D、s=s+521、VB程序中的赋值语句“x=x+1”是合法的( )。A、正确 B、错误22、已知n是一个两位的正整数，则下列表达式能表示整数n的个位数字的是（ ）A、n/10 B、n mod 10 C、n10 D、int(n/10)23、程序有三种基本结构，下列不属于这三种基本结构的是（ ）A、树形结构 B、循环结构 C、选择结构 D、顺序结构24、已知赋值语句s=”Good Bye!”，则下列定义变量s正确的是（ ）A、dim s a

8、s integer B、dim s as string C、dim s as long D、dim s as double25、仪仗队队员对身高H的选拔要求是：高于1.85米，但不能超过1.90米，下列表达式能正确表达的是（ ）A、H=1.85 and H1.85 and H1.85 or H=1.85 or H=1.9026、下列序列能采用二分查找法查找某一元素的是（ ）A、34,25,17,9,10,3 B、1,4,7,15,13 C、6,9,12,14,23,25 D、15,14,12,7,2,327、S=1+2+3+N，找出一个最大数N，使得S3000。编写程序，解决此问题，最合适的程

9、序结构是（ ）。A、顺序结构 B、选择结构 C、分支结构 D、循环结构28、下列关于算法的描述正确的是（ ）A、算法的步骤可以是无穷的B、算法必须有输出C、算法就是程序D、算法必须有输入29、下列选项中，不能作为VB程序变量名的是（ ）A、123abc B、abcC、abc123 D、abc_12330、水仙花数是三位整数：其各位数字立方和等于该数本身，如15313+53+33，如果要求出所有的水仙花数，下列算法最合适的是（ ）A、解析法 B、排序法C、查找法 D、枚举法31、如图所示，三个文本框自上而下的顺序是Text1，text2，text3，在文本框text1中输入3，在文本框text2

10、中输入4，单击命令按钮“计算”后，文本框Text3中显示的内容是（ ）A、24 B、12 C、14 D、732、以下程序段的结构是（ ）x100If x0 then Y=Abs(x)Else Y= Sqr(x)End ifA、顺序结构 B、循环结构C、选择结构 D、三项都是33、下列变量定义正确的是（ ）A、dim a*c as stringB、dim abc as integerC、dim for as double D、dim 4ac as Boolean34、下列表达式能判断正整数是偶数的是（ ）A、x mod 2=0 B、x mod 2=1 C、x2=0 D、x mod 2 035、用

11、计算机解决某个问题，问题分析清楚后，给出解决这个问题详细的（ ），这个过程称为设计算法。A、编程语言B、方法和步骤C、加密措施D、程序代码36、下列选项中，能作为VB程序变量名的是（ ）A、doB、x/yC、xyD、x*y37、下列程序执行后，变量s的值是（ ）。s=0For i=1 to 10s=s*iNext iA、10 B、55 C、0 D、138、一元二次方程判别式b 2-4ac的正确的VB表达式是（ ）A、b 2-4acB、b*b-4*a*cC、b 2-4*acD、b*b-4a*c39、下列问题合适用解析法求解的是（ ）A、输出1000以内所有的完全平方数B、将全班同学按照身高从高到

12、矮排队C、在一组彩球中寻找出所有的红球D、一个小球从100米高的楼顶做自由落体运动，求落地时的速度V40、以下关系表达式的值，可能为True的是（ ）A、42*2B、x=x+1C、24D、i0B、a0 or b*b-4*a*c0C、a0D、a0 And b*b-4*a*c044、下列流程图中是选择结构的是（ ） A、B、C、D、45、下列选项中，能作为VB程序变量名的是（ ）A、ifB、x2C、a*bD、2x46、以下程序段语句执行后，y的值是（ ）x=16If x0 then y=abs(x)Else y=sqr(x)End IfA、256B、16 C、4D、其他三项答案都不对47、下列程序

13、段运行后，s的值是（ ）s=0For i=2 To 10 s=s+iNext iA、10 B、55 C、53 D、5448、在VB语言中，int（x）函数的功能是返回不大于x的最大整数，fix（x）函数的功能是返回x的整数部分（截掉x的小数部分）。表达式int（2.88）+fix（-3.89）的值是（ ）A、-1 B、-2 C、其他三项答案都不对 D、0、49、下列哪个程序运行结果如图所示？（ ）50、下列选项中，能作为VB程序变量名的是（ ）A、s+1B、3stuC、trueD、s151、在VB中，Int(x)函数的功能是返回不大于x的最大整数，设a=3，b=4，c=5，则下列表达式的运算结

14、果中最大的是（ ）A、Sqr(c)B、a2+b2+c2C、Abs(a-b)D、Int(2*a-c/b)52、在VB中，用变量code存储学生的借阅卡编码(code=”N020170502”)，则变量code的数据类型应定义为（ ）。A、DoubleB、StringC、SingleD、Integer53、Visual Basic程序设计语言属于（ ）A、汇编语言B、机器语言C、自然语言D、高级语言二、操作题1、阅读程序，写出运行结果Dim a(10) As IntegerDim i As Integera(1)=1a(2)=1For i=3 To 6 a(i)=a(i-1)+a(i-2)Next

15、 iPrint a(6)上述程序运行后，输出a(6)的值是_（6分）2、分析并完善程序以下是计算s=1*2*3*10的程序代码，请补全程序。（6分）Dim s As LongDim i As Integers=_For i=1 To 10 s=_Next iPrint s3、算法设计与程序实现勾股数勾股数是指满足条件a2+b2=c2的自然数，求出100以内满足ab的所有勾股数。【算法分析】a的取值范围1,100;b的取值范围1,100;c的取值范围1,100.【参考程序】Dim a As IntegerDim b As IntegerDim c As IntegerFor a=1 To 100

16、 For b=1 To 100 For c=1 To 100 If _Then Print a;b;c abc之间以分号分隔 End If Next c Next bNext （1）本题采用的算法是_（填写：解析法/枚举法/排序法/递归法）。（2）程序代码中空白处应填写的条件是_（填写字母：A/B/C/D）A、ab And a2+b2=c2B、ab Or a2+b2=c2C、ab And a2+b2=c2D、ab And a2+b2=c24、阅读程序，写出运行结果Dim s As IntegerDim i As Integers=0For i=1 To 10 Step 4 Print “#”

17、s=s+iNext iPrint s上述程序运行后，输出“#”的个数是_；输出s的值是_。（共6分，每空3分）5、阅读程序，写出运行结果Dim a As IntegerDim b As IntegerDim r As Integera=98b=63r=a mod bDo While r0 a=b b=r r=a Mod bLoopprint b程序运行后，输出结果为：_。（6分）6、算法设计与程序实现换钱问题 要将一张100元的钞票，换成等值的5元、2元、1元一张的钞票共50张。其中一种换发如下： 5元：3张 2元：38张 1元：9张 求出所有的换钱方案。【算法设计】 x表示5元的张数：1x2

18、0; y表示2元的张数：1y50; z表示1元的张数：1z100.【参考程序】Dim x As IntegerDim y As IntegerDim z As IntegerFor x=1 To 20 For y=1 To 50 For z=1 To 100 If _Then Print x;y;z x y z 之间以分号分隔 End if Next z Next yNext x根据上述回答下列问题：（8分，每空4分）（1）本题采用的算法是_（填：解析法/枚举法/排序法/递归法）。（2）程序代码中空白处应填写的条件是_（填写字母：A/B/C/D）。A、5x + 2y + z=100 Or x

19、+ y + z = 50B、5x + 2y + z=100 And x + y + z = 50C、5*x + 2*y + z=100 Or x + y + z = 50D、5*x + 2*y + z=100 And x + y + z = 507、分析并完善流程图执行流程图，当输入x的值为4时，输出y的值为2，则菱形判断框中的条件可能为_（填写字母：A/B/C/D 6分）。A、x3 B、x4 C、x=4 D、x0 r=_ s=r & s n=_LoopText2.Text=s（1）、上述算法描述采用的方法是：_（填：自然语言/伪代码/流程图）。（2分）（2）、在参考程序处应填入_（填写字母：

20、A/B/C/D）。（3分）A、n Mod 2 B、n 2C、2 Mod nD、n / 2（3）、在参考程序处应填入_（填写字母：A/B/C/D）。（3分）A、n Mod 2B、n 2C、2 Mod nD、n / 210、阅读程序，写出运行结果Dim n As Integern=Val(InputBox(“n=”)Do While n Mod 2=0n=n2LoopPrint n程序运行时，输入24，输出n的值是：_(提示： 整除运算 如：172=8； Mod 取余数运算 如：17 mod 2 =1)11、分析并完善程序以下是计算s=1+6+11+101的程序代码，请完善程序。Dim s As

21、IntegerDim i As Integers=0For i=1 To 101 Step_s=_Next iPrint s12、算法设计与程序实现某市出租车收费标准如下：（1）3公里内（含3公里），收费8元；（2）超过3公里但未超过6公里部分，按1.5元/公里收费；（3）超过6公里部分，按2.25元/公里收费。根据以上标准，输入出租车行驶的公里数，请计算顾客需付费多少元？【参考代码】Dim s As SingleDim p As Single s=Val(InputBox(“s=”) If s6 Thenp=2.25*(s-6)+1.5*3+8End IfPrint p根据上述回答下列问题：

22、（1）、本题采用的算法是_（填写：解析法/查找法/枚举法/排序法）。（2）、程序代码中空白处应填写的条件是_（填写字母：A/B/C/D）.A、33 And s3 Or s=613、阅读下列程序，写出运行结果（6分）S=0For i=1 to 3 For j=1 to 5 S=s+1 Next jNext iPrint s上述程序运行后s的输出值是_ (6分)14、算法设计与程序实现假设公鸡一只5钱，母鸡一只3钱，小鸡一钱3只。现用100钱来买100只鸡。问：公鸡、母鸡、小鸡各买多少只？（要求公鸡、母鸡、小鸡都是整数）设计算法并编写程序输出所有的买鸡方案Dim x As Integer, y A

23、s Integer, z As IntegerFor x=0 To 20For y=0 To 33For z=0 To 99 Step 3If_ Then Print “公鸡：” x, “母鸡：” y,”小鸡：” zExit ForEnd IfNext zNext yNext xEnd Sub【算法设计】根据上述回答如下问题（共8分，每题4分）（1）、本题采用的算法是_（填写：解析法/枚举法/排序法/递归法）（2）、程序代码中空白处应填写的条件是_（填：A/B/C/D）A、x + y + z=100 AND 5x+3y+z/3=100B、x + y + z=100 OR 5x+3y+z/3=1

24、00C、x + y + z=100 AND 5*x+3*y+z/3=100D、x + y + z=100 OR 5*x+3*y+z/3=10015、补全程序数列问题已知包含25项的数列：1,2/3,3/5,24/47,25/49问题1：写出该数列的通项公式f(n)=_。（3分）问题2：以下是计算s=1+2/3+3/5+24/47+25/49的程序，请补全代码：Dim i As IntegerDim s As Singles=0 For i=1 to 25 s=s+_ (3分)Next iPrint “s=” , s16、求三角形面积已知a、b、c分别为三角形的三条边长，利用海伦公式求该三角形面积p=(a+b+c)/2编程实现：输入边长a，b，c，如果能构成三角形，输出面积，否则输出“No Answer!”界面如下：（8分）Dim a As Single , b As Single , c As Singlea=val(text1.text)b=val(text2.text)c=val(text3.text)If ( ) then p=(a+b+c)/2 s=sqr(p*(p-a)*(