年第二学期高中信息技术选修模块《算法与程序设计》期末试卷.pdf
上传人:文库****品店 上传时间:2024-09-11 格式:PDF 页数:5 大小:230KB 金币:10 举报 版权申诉
预览加载中,请您耐心等待几秒...

年第二学期高中信息技术选修模块《算法与程序设计》期末试卷.pdf

年第二学期高中信息技术选修模块《算法与程序设计》期末试卷.pdf

预览

在线预览结束,喜欢就下载吧,查找使用更方便

10 金币

下载此文档

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

本溪市2011年第二学期高中信息技术选修模块《算法与程序设计》期末试卷考试时间:60分钟满分:100分一、单项选择题(本大题10小题,每小题2分,共20分)1、小林同学想通过程序设计解决“韩信点兵”的问题,他制定的如下步骤,正确的是()A、设计算法,编写程序,提出问题,运行程序,得到答案B、分析问题,编写程序,设计算法,调试程序,得到答案C、分析问题,设计算法,编写程序,调试程序,得到答案D、设计算法,提出问题,编写程序,运行程序,得到答案2、以下关于算法的描述,正确的是()A、一个算法不允许有零个输入B、一个算法只允许有一个输出C、一个算法可以执行无穷个步骤D、一个算法的每个步骤必须要确切地定义3、下列各种基本数据类型说明符中表示整数型的是()A.IntegerB.BooleanC.SingleD.String4、VisualBasic工程文件的扩展名是()A、.forB、.frmC、.vbpD、.bat5、在VB中,要想单击“结束”按钮时结束程序,可在该按钮的()事件过程中输入代码"End"A、ChangeB、KeyPressC、DblClickD、Click6、下列常量说明中,符合语法的是()A、CONSTcolorAsredB、CONSTconst=10*5C、CONSTPIAsSingle=3.14D、CONSTcolor=abcd7、下列选项中函数Mid("yesterday",7,3)的返回值是()A、"yes"B、"ter"C、"day"D、"ds"8、下列选项中函数Len("VB的学习")返回值的是()A、7B、5C、9D、119、字符串"ABCD"和字符串"DCBA"进行比较,如果让比较的结果为真,应选用关系运算符()A、>B、<C、=D、>=10、以下程序中的循环体执行的次数是()PrivateSubCommand1_Click()ForA=1To100Step2S=S+ANextAPrintSEndSubA、48B、49C、50D、51二、判断题(本大题10小题,每小题2分,共20分。在题后的括号中填“√”或“×”)1、一个算法可以用多种程序设计语言来实现()2、字符串型数据是指用''括起来的一串字符()3、MsgBox函数返回值的类型为数值()4、控件是应用程序的基本元素,与窗体共同构成应用程序的界面()5、在VB程序中,若有下面的程序片断,则其中print语句的作用是输出一个空行()„„Print„„6、在面向对象的程序设计中,对象是有着特殊数据(属性)与操作(行为)的实体()7、若a=10,b=20,执行a=b:b=a后,则a=20,b=10()8、面向对象程序设计的优点主要表现在可以用于解决软件复杂性控制和提高软件生产力()9、当我们编写好程序后想调试运行程序,可以在VB可视化环境中选择“运行”菜单下的“启动”命令或按F6键()10、穷举法的思路是,列举出所有可能的情况,逐个判断有哪些是符合问题所要求的条件从而得到问题的解答()三、看图填空:下图是VB的标准工具箱,请在横线上写出对应的控件名称(每空2.5分,共10分)四、完善程序(每个空5分,共20分)1、计算1+1/2+1/3+„„+1/50的值。PrivateSubCommand1_Click()DimIasIntegerDimsAsDoubles=0Fori=1Tos=NextiPrint"S=";sEndSub2、程序界面如右图所示,在文本框Text1中输入一个十进制正整数,单击“转换”按钮command1后,对应的二进制数在标签label1中显示出来;之后命令按钮变为“再来一次”,又可再次进行转换。PrivateSubcommand1_click()DimnkAsStringDimnAsIntegerDimkAsIntegerIfCommand1.Caption="转换"Thenn=Val(Text1.Text)DoWhilen<>0k=nMod2nk=CStr(k)&nkLoopLabel1.Caption=Command1.Caption="再来一次"ElseLabel1.Caption=""Text1.Text=""Text1.SetFocusCommand1.Caption="转换"EndIfEndSubPrivateSubForm_Load()Command1.Caption="转换"EndSub五、阅读程序写出运行结果(每小题5分,共10分)1、PrivateSub