资源描述
一、选择题（每题2分，共15题，总分30分）1、利用计算机解决问题的一般过程描述，以下哪中说法正确：（C）A、编写程序调试程序分析问题设计算法B、分析问题编写程序调试程序设计算法C、分析问题设计算法编写程序调试程序D、分析问题设计算法调试程序编写程序2、用来描述算法的方法，不包括以下哪一种：（D）A、自然语言 B、流程图 C、伪代码 D、方程式3、以下的哪一种基本结构不被包括在程序的基本结构里面（B）A、顺序 B、分支 C、选择 D、循环4、程序设计语言的产生与发展所经历的过程不包括以下的哪项：（C）A、机器语言 B、汇编语言 C、初级语言 D、高级语言5、利用basic语言编写的程序源代码文件名后缀为：（A）A、.BAS B、.CPP C、.TXT D、.DOC6、下面数据属于字符串常量的是:(B )A、abcd B、“abcd” C、abcd D、ab-cd7、一个算法所具有的五个方面的重要特征里，下列哪一项是不必须的：（A ）A、输入 B、确定性 C、有穷性 D、输出 E、能行性8、下列哪种格式为VB程序设计中常量说明的正确格式：（D ）A、const 常量名 as 类型 B、dim 常量名 as 类型C、dim 常量名 as 类型=表达式 D、const 常量名 as 类型=表达式9、信息的载体是承载信息的事物，如语言、文字声音、磁盘等。则下面选项为信息载体的是：（D ） A、 天气预报 B、市场价格 C、电视新闻 D、光盘 10、关于信息，下列说法错误的是（D ） A、信息必须依附于载体而存在 B、信息是可以共享的 C、信息是可以处理的 D、信息的价值不会改变 11、电子邮箱地址的一般格式是：yournamexx.com,其中yourname是（D）A、网站的计算机名 B、主机名 C、用户的计算机名 D、用户名12、在网络时代，流行着一句时代用语：“有问题，“百度”一下！”，其中“百度”是指的（A ）A、 利用百度搜索引擎在网络上检索信息。 B、 其是一个很好的投资项目 C、 是一个专家 D、 是一家理财公司 13、王刚十一国庆要出去旅游，他在报纸上看到将来十天是阴雨天气，于是就带了雨具，可是直到他回到家也没有下过雨。当他又拿起那张报纸仔细看时才发现自己所看的是去年国庆期间的报纸。就信息的特征来说，王刚忽略了信息的什么特征？(B ) A、依附性 B、时效性 C、价值性 D、共享性 14、信息采集的工具有很多，下面那个工具是不包括其中的（D ）A、数码相机 B、计算机 C、照相机 D、收音机15、计算机病毒是：（B ）A、一种生物病毒 B、一组计算机有害代码 C、一种寄生在计算机内的寄生虫 D、一种细菌 二、判断题（每题1分，共4题，总分4分）1、 我们可以通过电子邮箱给远方的朋友发送电子邮件，但是电子邮箱中只能发送文本而不能发送图片。（F ）2、 算法就是用计算机求解某一问题的方法，是能被机械地执行的动作或指令的无穷集合。（F ）3、 用高级语言编写的程序必须经过翻译器将其翻译成机器语言，才能在计算机上执行。（T ）4、 因特网给我们带来了大量的信息，这些信息都是可信的，可以直接用。（F ）三、填空题（每空2分，共3空，总分6分）一个“求半径为r的圆的面积”的程序如下：private sub command1_click() const pi as single=3.14 dim r as single,s as single r=inputbox(“r=”, “输入半径”) s=pi*r*r print “圆的面积s=”;send sub1、由上可以看出，VB的程序一般包含如下部分：数据类型说明部分、数据输入、数据处理 、数据的输出部分。2、在以上程序中，“single”为单精度实型 数据类型的说明符。四、程序补充题（每空2分，共5空，总分10分）1、几何原理中，欧几里德阐述了关于两个整数最大公约数的计算过程，即欧几里德算法（辗转相除法），其具体过程如下：以m除以n，令所得的余数为r。若r=0，则输出结果n。否则，继续步骤。令m=n，n=r，并返回执行步骤继续进行。设正整数m=112，n=64，利用此算法求其最大公约数的过程算法如下：（1）112除以64，余数为48。（2） （3） 答：112和64的最大公约数为： 2、根据算法补全VB程序：求解鸡兔同笼问题：在笼中有鸡、兔若干，已知道有头a个，有脚b只（4a=b=2a0），求各有多少只鸡和兔？算法如下：输入 a和b的值；求x=2a-b/2；求y=b/2-a；输出x,y的值；结束。程序：private sub command1_click()a=inputbox(“a=”,”输入头数”)b=inputbox(“b=”,”输入脚数”)_、_、_print “鸡数x=”;x,”兔数y=”;yend sub一、 单项选择题（共20个空，每空2分，共40分）1、 人们利用计算机解决问题的基本过程一般有如下五个步骤（），请按各步骤的先后顺序在下列选项（AD）中选择正确的答案（ B ）调试程序 分析问题 设计算法 构建数学模型 编写程序（A） （B） （C） （D）2、 下列各种基本数据类型说明符中表示整数型的是（ A ）（A） Integer （B） Boolean （C） Single （D） String3、 下列各项中，合法的变量名是（ C ）（A） &90 （B） abc=9 （C） hello （D） 888.f4、 有两个条件P 、Q，只要有一个条件为真时，结果一定为真的是（ C ）。（A）Not P （B）P And Q （C）P OR Q （D）NOT P AND NOT Q5、 下列代数式的Visual Basic表达式是（ D ）（A）(x5-cos(29*3.14/180)/(sqr(exp(x)+log(y) +5)（B）(x5-cos(29)/(sqr(exp(x)+ln(y)+5)（C）(x5-cos(29*3.14/180)/(sqr(exp(x)+ln(y)+5)（D）(x5-cos(0.506)/(sqr(exp(x)+log(y)+5)6、 在VB中，表达式（18+25/3）Mod 5 的值是（ B ）。（A）0 （B）1 （C）2 （D）37、 VB函数InStr ()检查是否包含另一子串：含有子串则返回值为子串在父串中第一次出现的位置，不包含子串则返回值为0。InStr(CATbCACBC, BC)的值为（ C ）（A）0 （B）4 （C）8 （D）18、 VB函数Right ()从字串右端取部分字串：将某一字串从结尾开始取固定长度的字串。Right(“Visual Basic 6.0”,6)的值为（ D ）（A）sic 6.0 （B）asic 6.0 （C）Visual （D）ic 6.09、 程序如下：k=20 do while (k=0)k=k+1 loop 以下说法正确的是（ C ）（A）do while 语句执行了20次； （B） While 循环是无限循环（C）循环体语句一次也不执行 （D） 循环体语句执行一次10、 VB中将两个字符串连接起来的运算符有：+和&，那么 ”123”+45结果是（ A ） （A）168 （B）12345 （C）“123” （D）4511、 已知A，B，C，D是简单变量，且都已有互不相同的值，执行语句B=8:A=C:D=A:D=B后，其值相等的变量是（ B ）（A）A，D （B）A，C （C）C，B （D）B，A12、 要交换变量A和B之值，应使用的语句组是（ B ）（A）A=B:B=C:C=A （B）C=A:A=B:B=C （C）A=B:B=A （D）C=A:B=A:B=C13、 模块化程序设计方法主要通过（ B ）来实现。（A）递归算法和递归程序 （B）过程和函数的定义和调用（C）程序的循环结构 （D）对象11、一位爱好程序设计的同学，想通过程序设计解决“韩信点兵”的问题，他制定的如下工作过程中，更恰当的是（ C） A、设计算法，编写程序，提出问题，运行程序，得到答案B、分析问题，编写程序，设计算法，运行程序，得到答案C、分析问题，设计算法，编写程序，运行程序，得到答案D、设计算法，提出问题，编写程序，运行程序，得到答案12、交通警察到达案发现场，一般按照下列哪种思路开展工作（D ）观察、分析现场 收集必要的信息 进行判断、推理 按一定的方法和步骤解决A、 B、 C、 D、13、下面说法正确的是（A ） A、算法+数据结构=程序 B、算法就是程序 C、数据结构就是程序 D、算法包括数据结构14、结构化程序设计由三种基本结构组成，下面哪个不属于这三种基本结构（B）A、顺序结构 B、输入、输出结构 C、选择结构 D、循环结构三、判断题（每题1.5分，共21分）1、信息是人类社会的一种资源。 （T ）2、计算机书本中的知识是信息。 （T ）4、一台计算机一旦染上病毒，便无法使用。（F ）5、 Visual Basic是美国微软公司于1991年推出的基于Basic的可视化程序设计语言。（T ）7、一个算法可以用多种程序设计语言来实现。（T ）8、我们常说的程序设计语言就是程序设计。（F）9、控件是应用程序的基本元素，与窗体共同构成应用程序的界面。（T ）11、计算机病毒就是一种人为编写的具有破坏性的程序（T）12、Flash、Fireworks、Dreamweaver就是通常所说的“网页三剑客” （T ）13、在网络上，言论是自由的，所以你想说什么话都可以。（F）14、电视中播放的奥运会比赛的各国金牌数是信息。（T） 一、单选题（每题2分，共40分）1、流程图中表示判断框的是（ B ）。、矩形框、菱形框 、圆形框、椭圆形框2、由“上车掏钱投币”所描述的问题是（A ）。、无人售票车投币过程、乘公交车过程 、上车过程、下车过程3、下列给出的赋值语句中正确的是（C ）。A、4 = M B、-M =M C、B=A3 D、x + y = 04、下列Visual Basic中，下列（D ）的表达式的值不等于4。A、int(4.1) B、Int(4.9) C、Abs(int(-3.9) D、Abs(int(-4.5)5、下列Visual Basic中，下列（C ）类型属于字符串型。A、Integer B、Single C、String D、Boolean6、下列Visual Basic中，下列关键字（A ）用于注释语句。A、Rem B、End C、Else D、Loop7、假定X是一个数值型变量，那么由函数组成的表达式INT(X/2)=X/2（A ）。 A、用于测试X是否偶数 B、返回一个整数 C、返回一个奇数 D、用于测试X是否整数8、要改变新建对象的缺省名称，应使用属性（C ）。 A、 Font B、ForeColor C、Name D、Height9、如果下面程序执行后输出的结果是132，那么在程序until后面的“条件”应为（D ）。i=12：s=1DOs= s * ii = i1LOOP UNTIL “条件”PRINT sENDA、i 11 B、i =11 C、i =11 D、i1112、要使一个命令按钮显示文字“确定”，正确的设置是把该命令的（C ）。 A、属性Font设置为“确定” B、属性.ForeColor设置为“确定” C、属性Caption设置为“确定” D、属性BorderStyle设置为“确定”13、表达式Abs(-3.6)*sqr(100)的值是（D ）。 A、-360 B、360 C、-36 D、3614、下面程序运行后的输出结果为（C ）。i=1do WHILE i8i=i+2s=2*i+3loopPRINT sENDA、17 B、19 C、21 D、2315、下列Visual Basic程序段运行后，变量a,b,c的值为（C ）。 a=1:b=1:c=1 Do While a+b+cSqr(y) A、7 B、8 C、9 D、1017、下列Visual Basic程序段运行后，变量s的值为（B ）。a=2:b=1:s=0 For I=10 To 6 Step-1 s=s+a c=a+b a=b b=c Next I A、10 B、17 C、6 D、2818、在Visual Basic中程序段是计算（C ）公式的。s=0 For I=1 To 10 t=1for j=1 to it=t*Inext js=s+t Next I A、s=1+2+3+4+5+6+7+8+9+10 B、s=1*2*3*4*5*6*7*8*9*10 C、s=1!+2!+3!+4!+5!+6!+7!+8!+9!+10! D、s=1+2*3+3*4+4*5+5*6+6*7+7*8+8*9+9*1019、下列Visual Basic程序段运行后，变量s、t的值为（B ）。s=0:t=1 For k=2 To 4 s=s+k t=t*k Next k A、2 2 B、9 24 C、5 6 D、0 120、下列Visual Basic程序段运行后，变量max的值为（B ）。 a=5:b=10:max=a IF bmax Then max =b A、5 B、10 C、5和10 D、以上都不是二、填空题（每空1.5分，共30分）1、打印出如下图1222 33333 444444455555555566666666666程序如下：Private Sub Command1_Click() For i=1 to _ print tab(20-i)For j=1 to _ Print_ Next j Print Next iEnd Sub2、下列程序的功能是从键盘上任意输入一个数，判断这个数是正数、负数、还是零，并输出判断结果。程序中有三处错误，请更正。程序如下：Private Sub Command1_Click() Dim a As Single Dim py As String a=Val(Text1) If a0 Then py=正数 If a=0 Then py=零 If a99PRINT sENDINPUT tIF t= 3 THENc=0.2ELSEc=0.2+0.1(t-3)END IFPRINT cEND3、某电信部门规定：拨打市内电话时，如果通话时间不超过3分钟，则收取通话费0.2元，如果通话时间超过3分钟，则超过部分以每分钟0.1元收取通话费（通话不足1分钟时按1分钟计），试设计一个计算通话费用的算法。要求写出算法，画出程序框图，编写程序。解 我们用c（单位：元）表示通话费，t（单位：分钟）表示通话时间，则依题意有 算法步骤如下：第一步，输入通话时间t；第二步，如果t3，那么c = 0.2 ；否则令 c = 0.2+0.1 (t3)；第三步，输出通话费用c ；一、单选题（每小题3分，20小题，共60分）1、用计算机解决问题时，首先应该确定程序“做什么？”，然后再确定程序“如何做？”请问“如何做？”是属于用计算机解决问题的哪一个步骤？（B）A、分析问题B、设计算法C、编写程序D、调试程序2、在调试程序过程中，下列哪一种错误是计算机检查不出来的？（C）A、编译错误B、执行错误C、逻辑错误D、任何错误计算机都能检查出来3、下列关于算法的叙述中，错误的是（A）A、一个算法至少有一个输入和一个输出B、算法的每一个步骤必须确切地定义C、一个算法在执行有穷步之后必须结束D、算法中有待执行的运算和操作必须是相当基本的。4、流程图中表示判断的是（ B ）。、矩形框、菱形框 、圆形框、椭圆形框5、任何复杂的算法都可以用三种基本结构组成，下列不属于基本结构的是（C）A、顺序结构B、选择结构C、层次结构D、循环结构6、能够被计算机直接识别的语言是（C）A、伪代码B、高级语言C、机器语言D、汇编语言7、在VB语言中，下列数据中合法的长整型常量是（D）A、08AB、2380836EC、88.12345D、1.2345E68、求Mid(“ABCDEFG”,3,2)的结果是（B）A、“ABC”B、“CD”C、“ABCDEF”D、“BCD”9、表达式 A+B+C=3 OR NOT C0 当A=3,B=4,C=-5,D=6时的运算结果是（B）A、0B、1C、TRUED、FALSE10、在循环语句 For x=1 to 100 step 2 Next x 中，x能达到的最大值是（A）A、100B、99C、98D、9711、在下列选项中，不属于VB的对象的是（A）A、窗体的背景颜色B、命令按钮C、文本框D、标签12、在调试程序的时候，经常要设置断点，设置断点的快捷键是（C）A、F1B、F8C、F9D、F1213、算法描述可以有多种表达方法，下面哪些方法不可以描述“闰年问题”的算法（D ）A、自然语言 B、流程图 C、伪代码 D、机器语言14、以下不属于非法用户自定义标识符（常量和变量命名）的是（B ）A、8ad B、ad8 C、_a8d D、const15、已知A，B，C，D是整型变量，且都已有互不相同的值，执行语句B=0；A=C；D=A；D=B；后，其值相等的变量是（B ）A、A，D B、A，C C、C，B D、B，A16、要交换变量A和B的值，应使用的语句组是( B)A、A=B；B=C；C=A B、C=A；A=B；B=CC、A=B；B=A D、C=A；B=A；B=C17、VisualBasic中以单引号开头一行文字称为注释，它对程序的运行（D） A、起一定作用B、有时候起作用 C、不起任何作用，但是必须的D、不起任何作用，但能增加程序的可阅读性18、要使一个命令按钮显示文字“确定”，正确的设置是把该命令按钮的（C ）。A、属性Font设置为“确定” B、属性.ForeColor设置为“确定”C、属性Caption设置为“确定” D、属性BorderStyle设置为“确定”19、要从文本框TXTShowOut中输出中国您好！，代码为( B) A TextBox.text=中国您好！B TxtShowOut.Text=中国您好！ C TxtShowOut.Label=中国您好！D Val(TxtShowOut.Text)=“中国您好！”20、下列Visual Basic程序段运行后，变量max的值为（A ）。 a=11;b=15; max=aIF bmax Then max =bA、15 B、11 C、15或11都有可能 D、以上都不是二、阅读程序写结果（第12小题每题5分，第3小题10分，共20分）1、Private Sub Form_Load() N=InputBox(“请输入N的值：”,“输入”) S=1 For i=1 to N S=S*i Next i MsgBox “S=”+Str(s),0,”计算结果” End Sub当N=5时，运行的结果是_S=120_。2、Private Sub Command1_Click() Dim X as integer,X1 as integer,X2 as integer Dim X3 as integer,Y as integer X=InputBox(“X=”，“输入”) X1=X100 X2=(X-X1*100)10 X3=X-X1*100-X2*10 Y=X3*100+X2*10+X1 Print “Y=”;Y End Sub当X=258时，运行的结果是_Y=852_。3、Private Sub Command1_Click() Dim A as Integer,B as Integer,C as Single Dim D as String N=InputBox(“请输入N的值：”) F=N MOD 5 A=N+1 B=ABS(N) Select Case F Case 1:C=A+B:D=”+” Case 2:C=A-B:D=”-” Case 3:C=A*B:D=”*” Case 4:C=A/B:D=”/” Case else:End End Select Print A;D;B;”=”;C End Sub当N=13时，运行的结果是_14*13=182_。三、程序填空（每小题10分，2小题，共20分）1、下面的程序是求100以内奇数和S的值（S=1+3+5+7.+99），请把空缺的地方填写完整。Private Sub Command1_Click() Dim S As Integer Dim I As Integer S=_（1）_ For I=1 to 100 Step _（2）_ S=S+I Next _（3）_ Label1._（4）_=_（5）_(S)End Sub（1）_0_ （2）_2_ （3）_i_ （4）_Caption_ （5）_Str_2、某旅行团共有30个人，其中有男人、女人和小孩，他们在一家餐厅吃自助餐花去500元。已知自助餐的价格是每个男人30元，每个女人20元，每个小孩10元。问：男人、女人、小孩各为多少人。下面是解决该问题的VB程序，请在空缺的地方填写完整。Private Sub Command1_Click()Dim Man As Integer, Woman As Integer, Child As IntegerDim Money As Integer,Count As IntegerCount=0 用来记录符合条件的组合数For Man = 1 To _(1)_(500/30) For Woman = 1 To (30-Man) Child = _(2)_ Money= 30 * Man + 20 * Woman + 10 * ChildIf _(3)_ Then Count=Count+1 Print “第”;Count;”种情况：” Print Tab(10);”男人”;Man;”个”; Print Tab(25);”女人”;Woman;”个”; Print Tab(40);”小孩”;Child;”个”; Print End If Next _(4)_Next _(5)_End Sub（1）_Int 或 Fix_ （2）_30-Man-Woman_ （3）_Money=500_（4）_Woman_ （5）_Man_
展开阅读全文