《高中信息技术会考分类汇编及参考答案算法与程序设计题（第七套）》由会员分享，可在线阅读，更多相关《高中信息技术会考分类汇编及参考答案算法与程序设计题（第七套）（6页珍藏版）》请在金锄头文库上搜索。
1、高中信息技术会考分类汇编及参考答案算法与程序设计题（第七套）一、选择题（本题有 14 小题，每小题 3 分，共 42 分。选出各题中一个符合题意的正确选项，不选、多选、错选均不给分。）1.多媒体信息数字化后数据量很大，为了提高存储、处理和传输效率，需要对这些数据进行压缩，下列压缩标准用于音频压缩的是（）（A）JPEG B)MPEG-1 C)MPEG-2 (D)MP32十进制数10 转换成二进制数是（）（A）(10)2 （B）(1001) 2 （C）(1010)2 （D）(1011)23下列主要用于网页浏览的软件是（）（A）Word （B）Excel （C）Intern Explorer（D）A
2、ccess4下列描述算法的流程图符号中属于开始、结束框符号的是（ B ）5要将明天的天气情况告诉公众，下列信息表达方式不恰当的是（）（A）将气象信息印刷成书 （B）通过电视发布信息（C）通过广播发布信息 （D）通过特定的网站发布6把电子邮件发送到收件人的电子信箱中，所采用的邮件传输协议是（）（A）FTP （B）TCP/IP （C）POP3 （D）SMTP7.只能被1 或本身整除的大于 1 的自然数称为素数。判断大于1 的某自然数m 是不是素数的算法基本思想是：把 m 作为被除数，将 2 到 m-1 中的自然数作为除数，逐一进行相除，如果都除不尽，m就是素数，否则 m 就不是素数。这种判定素数的
3、算法主要属于（）（A）枚举算法 （B）解析算法 （C）递归算法 （D）排序算法8.小王同学星期天的计划是：“8:00 起床、吃早餐，10:00 至 11:30 学习，12:30 看一部电影，14:30打篮球”。用算法描述这一计划，合适的算法结构是（）（A）顺序模式 （B）选择模式 （C）循环模式 （D）树型模式9. 在 Visual Basic 中，表示字符串型的数据类型名是（）（A）Long （B）Integer （C）String （D）Boolean10在 Visual Basic 中，求实数 x 的算术平方根的函数是（）（A）Int(x) （B）Sqr(x) （C）Abs(x) （D）
4、Log(x)11.在 Visual Basic代码窗口中，语句Book1.Text=Windows 操作系统中的Book1是（）（A）属性名 （B）属性值 （C）窗口名 （D）对象名12如果以下是一个完整 Visual Basic 块 If 语句，则划线处的语句应该是（）If ab Thenmax=aElsemax=b_（A）End （B）End Sub （C）End If （D）If End 13下列属于正确的 Visual Basic 表达式（）（A）2ab （B）2ab （C）2ab （D）2*a*b14在 Visual Basic中，已知 a、x、y 均是正整数，当逻辑表达式(a mo
5、d x = 0) And (a mod y=0)为真时，则表示（）（A） a 是 x 的倍数但不是y的倍数 （B）a 既是 x 的倍数，也是 y 的倍数（C） a 是 x 的倍数或者是 y 的倍数 （D） a 既不是 x 的倍数，也不是 y 的倍数四、程序设计题（本题有 4 小题，第 13 小题，每小题 4 分，第 4 小题 6 分，共 18 分）1 有如下 Visual Basic 程序段：a=8b=10b=a*b/2该程序段运行后，变量 b 的值为40 。2有如下 Visual Basic 程序段：a=5b=10max=aIf bmax Then max=b该程序段运行后，变量 max 的
6、值为 10。3下面程序的功能是：计算表达式 12310 的值，并在文本框 Text1 中输出表达式的值。为了实现这一功能，程序中划线处的语句应更正为_t=1_。Private Sub Command1_Click()Dim i As Integer， t As Longt=0For i=1 To 10t=t*iNext iText1.Text=Str(t)End Sub4我国是人口大国，2007 年初，我国人口总数已达 13 亿 5千万。假设我国年人口增长率为 0.5%，则从 2007 年起多少年后我国人口就会达到或超过 15 亿？解决此问题的流程图如 VB-1 所示。根据流程图VB-1 编写的 Visual Basic 程序如下，在和划线处，填入合适的语句或表达式，把程序补充完整。Private Sub Command1_click()Dim n As Integer, r As SingleDim p As Doubler = 0.5/100p = 13.5n = 0Do While p 15n = n + 1Text1.Text = Str(n)End Sub程序中划线处应填入p=p*(1+0.005)程序中划线处应填入Loop
