资源描述
2016 年河北省普通高等学校对口招生考试计算机专业理论试题（A）注意事项：1本试卷共八道大题。总分240 分。2第I 卷“一、选择题”、第II 卷“二、判断题”的答案填涂在机读卡上，其余各题答案写在答题纸上，答在试卷上不得分。用蓝黑钢笔、碳素笔或圆珠笔答题。3答题前将密封线内项目填写清楚。第卷（选择题 共100 分）一、选择题（本大题共50 小题，每小题2 分，共100 分。在每小题所给出的四个选项中，只有一个符合题目要求，将正确选项填涂在机读卡上）1. 计算机能够自动、准确、快速地按照人们的意图运行的最根本原因是.（ ）A. 采用超大规模集成电路 B. CPU 作为中央核心部件C. 具有操作系统 D. 具有存储程序和程序控制功能2. 下列各组设备中，同时包括了输入设备、输出设备和存储设备的是.（ ）ACRT 显示器、CPU、Cache B绘图仪、鼠标、键盘C鼠标、绘图仪、光盘 D硬盘、打印机、LED 显示器3下列各组软件中，全部属于应用软件的是.（ ）A. 程序语言处理程序、操作系统、数据库管理系统B. 文字处理程序、编辑程序、MS-DOSC. Word 2003、MySQL 5.0、程序语言处理程序D. 财务处理软件、Flash、WPS、Office 20104在标准ASCII 码表中，数字、大小写英文字母的编码从小到大的次序是（ ）A. 大写英文字母、小写英文字母、数字 B. 数字、小写英文字母、大写英文字母C. 小写英文字母、大写英文字母、数字 D数字、大写英文字母、小写英文字母5. 存储300 个2424 点阵的汉字字形码，所需的存储容量大小为.（ ）A. 0.1728M 个二进制位 B21600 个字节C42.1875K 个字节 D0.3456M 个二进制位6. 运算器（ALU）的功能是.( ）A只能进行逻辑运算 B进行算术运算或逻辑运算C只能进行算术运算 D做初等函数的计算7. 以下关于病毒的描述，正确的是.（ ）A计算机病毒只在可执行文件中传播B计算机病毒主要通过读/写存储器或网络进行传播C只要删除所有感染了病毒的文件就可以彻底清除病毒D计算机杀毒软件可以查出和清除所有病毒8. 在下列各数据中，数值最小的是.（ ）A(156)8 B(139)10C(2FF)16 D(10100001)29在Windows XP 中，关于“画图”工具，以下说法不正确的是.（ ）A点击“开始”-“搜索”，输入“画图”可以找到“画图”工具B点击“开始”-“所有程序”-“附件”，可以找到“画图”工具C打开“控制面板”-“添加/删除程序”，可以卸载“画图”工具D在“画图”工具图标上点右键，可以将其添加到“开始”菜单10在Windows XP 中，不能在“任务栏”内进行的操作是.（ ）A. 窗口之间切换 B. 排列桌面图标C. 设置系统日期和时间 D. 启动“开始”菜单11. 在Windows XP 中，以下关于文件名的说法，不正确的是.（ ）A. 由于文件的扩展名使用.,因此文件命名时不能使用.B. 文件名可以使用通配符？和*C. 给文件命名时字母可以使用大小写格式，但不能用大小写区别文件名D. 文件名可用英文字母、数字和汉字命名12在Word 2003 中，将“计算机”一词设置为艺术字“ ”，则以下方法中不正确的是.（ ）A. “编辑”-“替换” B. “插入”-“图片”-“艺术字”C. “视图”-“工具栏”-“艺术字” D. “格式”-“字体”-“文字效果”13在Word 2003 中，若要设置表格的外框线为双线，内框线为单线，如下图，正确的操作是.（ ）三年前北京各区平均租金表区名一居室二居室三居室东城区149718772150西城区144219532260崇文区128415512000宣武区123315531900朝阳区126515641943A. 打开“表格”-“表格属性”-“边框底纹”，选择“方框”命令B打开“表格”-“表格属性”-“边框底纹”，选择“全部”命令C打开“表格”-“表格属性”-“边框底纹”，选择“自定义”命令D. 以上都可以14在Word 2003 中，如果在文档顶部或底部添加图形或文本，正确的操作是（ ）A. 通过“视图”-“页眉和页脚”进行设置B. 通过“插入”-“页眉和页脚”进行设置C. 通过“文件”-“页眉和页脚”进行设置D. 以上都不对15. 在Excel 2003 中，若要在“计算机专业考试成绩单”表中，按输入公式方式填充“等级”列，填充要求是：“综合成绩”高于90 分（含90）为“优秀”，60 分（含60）到90 分（不含90）为“合格”，60 分以下“不合格”。以下公式正确的是（ ）A=IF(E3=90,优秀,(IF(E3=60,合格,不合格)B=IF(E3=90,优秀,IF(E3=60,合格,不合格)C=IF(E3=60,合格,(IF(E3=90,不合格,优秀)D=IF(E3=90,合格,优秀)16. 在Excel 2003 中，如15 题图“计算机专业考试成绩单”所示，若突出显示“等级”为“优秀”的单元格，以下操作正确的是.（ ）A使用“自动筛选”功能 B使用“高级筛选”功能C使用“条件格式”功能 D使用“IF”函数17在Excel 2003 中，单元格中的数据显示为一串“#”时，说明.（ ）A公式中出现了0 为除数的情况 B单元格数据长度大于该列的宽度C出现语法错误 D. 公式中含有不能识别的函数18在Visual Basic 中，设A=“12345678”，则表达式Val(Right(A,4) + Mid(A,4,2)的值为.（ ）A123456 B. 567845 C. 123445 D. 572319. 在Visual Basic 中，将文本框的内容全部显示为用户所定义的字符的属性是.（ ）A. PasswordChar B. Password C. SelText D. 以上都不对20. 若评选优秀毕业学生的条件是：政治面貌（party）为团员，课程总分(total)大于285 分，其中三门主课(mark1,mark2,mark3)中有一门课为100 分，Visual Basic表达式应写为.（ ）A. party团员 and total285 and mark1=100 or mark2=100 or mark3=100B. party团员 and total285 or mark1=100 or mark2=100 or mark3=100C. (party团员 and total285) and (mark1=100 or mark2=100 or mark3=100)D. (party团员 or total 285) and (mark1=100 or mark2=100 or mark3=100)21. 在Visual Basic 中, 下面哪个选项属于控件的方法.（ ）A. Click B. Change C. SetFocus DDim22. 在Visual Basic中，窗体上有一个命令按钮（其Name属性为Command1），运行以下程序，单击命令钮，其输出结果是. .（ ）Option Base 1Private Sub Command1_Click()Dim aa = Array(1, 2, 3, 4)j = 1For i = 4 To 1 Step -1s = s + a(i) * jj = j * 10Next iPrint sEnd SubA4321 B234 C34 D123423. 在Visual Basic中，下面关于图片框(PictureBox)和图像框(Image)说法不正确的是.（ ）A. 图片框中可以装载其他控件 B. 均可加载图片C. 图像框中可以装载其他控件 D. 图像框比图片框占用更少内存24. 在Visual Basic中，有一个10个元素的数组，以下程序可将该数组逆置。即第1个元素与第10个元素交换，第2个元素与第9个元素交换，第5个元素与第6个元素交换，为实现此功能，应在横线处填写.（ ）Private Sub Command1_Click()Dim a(1 To 10) As IntegerDim i As IntegerDim p As IntegerDim t As IntegerDim j As IntegerFor i = 1 To 10a(i) = iNext iFor j = 1 To 5t = a(j)Next jFor i = 1 To 10Print a(i)Next iEnd SubA. a(j)=a(11-j) a(11-j)=tB. a(11-j)=a(j) a(j)=tCa(j)=t a(11-j)=a(j)D. a(11-j)=t a(j)=a(11-j)25. 在Visual Basic 中，单击一次命令按钮，下列程序代码的执行结果为.（ ）Private Sub Command1_Click()Dim a As Integer, b As Integer, c As Integera = 2: b = 3: c = 4Print fun2(a, b, c)End SubPrivate Function fun1(x As Integer, y As Integer, z As Integer)fun1 = 2 * x + y + 3 * zEnd FunctionPrivate Function fun2(x As Integer, y As Integer, z As Integer)fun2 = fun1(z, x, y) + xEnd FunctionA. 27 B. 21 C. 17 D. 3426. 在Visual Basic 设计阶段，为了清除窗体上的一个控件，下列正确的操作是（ ）A. 单击要清除的控件，然后按回车键 B. 单击要清除的控件，然后按Esc 键C. 单击要清除的控件，然后按Del 键 D. 以上都不对27. 在Visual Basic 中，下列程序段的输出结果是. .（ ）x = 5Select Case x + 1Case 5, 6, 7Print 5,6,7Case 0 To 9Print 0 to 9Case Is = 15Print is=5End SelectA. 5，6，7 B. 0-9 C. 0 to 9 D. is=528. 在Visual FoxPro 中，使用DIMENSION a(10)定义了一个一维数组，正确的赋值语句是.（ ）A. a=10 B. a10=10 C. STORE 10 a3,a4,a5 D. a2,a3,a4=1029. 在Visual FoxPro 中，下面有关视图的描述，正确的是.（ ）A. 可以使用MODIFY STRUCTURE 命令修改视图的结构B. 视图不能删除，否则影响原来的数据文件C. 视图是对表的复制产生的D. 使用SQL 对视图进行查询时，必须事先打开该视图所在的数据库30. 在Visual FoxPro 中，连续执行以下命令后，变量B 的值为.（ ）SET EXACT OFFA=河北B=(A=中国河北)? BA. .F. B. 中国河北 C.河北 D. .T.31. 在Visual FoxPro 中， 为了在报表中加入一个文字说明， 应该插入一个（ ）A. 表达式控件 B. 域控件 C. 标签控件 D. 文本控件32. 在Visual FoxPro 中，已使用命令MODIFY MENU mymenu 创建了一个菜单并生成了相应的菜单程序，则正确运行该菜单程序的命令是.（ ）ADO mymenu.mpr BDO MENU mymenu.mprCDO MENU mymenu DDO mymenu33. 在Visual FoxPro 中，下述描述正确的是.（ ）A. 利用查询可能修改数据 B. 利用视图可以修改数据C. 查询和视图的功能相同 D. 视图可以定义输出去向34. Visual FoxPro 是一种关系型数据库管理系统，所谓“关系”是指.（ ）A. 数据模型符合满足一定条件的二维表格B. 一个数据库文件与另一个数据库文件之间有一定的关系C. 各字段间的数据彼此有一定的关系D. 各条记录中的数据彼此有一定的关系35在Visual FoxPro 中，变量a 的值是“计算机网络工程师”,变量b 的值是“程序设计员”，结果为“程序设计工程师”的表达式是.（ ）A. substr(b,1,4)-substr(a,6,3) B. left(b,8)-right(a,6)C. left(b,4)-right(a,3) D. 以上都正确36 用户在互联网上经常使用的一种信息查询工具是.（ ）A. 电子公告板系统 B. 电子邮件 C. 网络加速器 D. 搜索引擎37. 网络中的计算机可以分为服务器和客户机，服务器主要用来向全网络提供某种协议的网络服务，客户机则主要用来访问、使用服务器上的服务。在下列关于客户机的描述中，错误的是.（ ）A智能手机不能用作客户机 B平板电脑可以作为客户机使用C笔记本电脑可以用作客户机 D高端台式机能用作客户机38. 下列哪种数据交换技术不属于存储交换技术.（ ）A分组交换 B报文交换 C信元交换 D线路交换39 ISO 是下列哪个组织的英文简写（ ）A国际电报电话咨询委员会 B国际标准化组织C电气和电子工程师协会 D电子工业协会40. 在使用IE 浏览器过程中点击“主页”按钮，下列说法正确的是（ ）A在IE 中显示最近访问过的网页 B访问Microsoft 公司的主页C访问百度公司的主页 D用户在IE 中自定义的主页41. 网络浏览器通常使用的协议是HTTP，该协议在服务器上使用的默认端口号为.（ ）A21 B25 C80 D2342. 如下图所示，计算机A 向计算机B 发送数据包，过程为：计算机A 通过网络1 向路由器C 发送数据包1；路由器C 通过网络2 向路由器D 发送数据包2；路由器D 通过网络3 向计算机B 发送数据包3。计算机及路由器的关键参数已经在邻近位置给出。问：在数据包传输过程中，封装在数据包2 中的目的IP 地址和目的MAC 地址是.（ ）A192.168.3.10 和03.ca.39.a0.01.75B192.168.10.200 和02.ba.83.34.ab.9eC192.168.3.10 和02.ba.83.34.ab.9eD192.168.30.100 和03.ca.39.a0.01.7543. Unix 是一种网络操作系统，可以安装运行TCP/IP 协议。有一台计算机安装了Unix操作系统和TCP/IP 协议，下列说法中错误的是（ ）A该计算机在联网后具有所在网络唯一的IP 地址。B该计算机网络参数中可以设置网关参数。C该计算机不能访问安装Windows 网络操作系统的计算机网络。D该计算机可以按域名访问互联网网站。44. 下列关于UDP 协议的描述中正确的是（ ）A不可靠 B传输过程不透明 C面向连接 D有序传送数据包45. 在TCP/IP 协议体系中，ARP 协议的作用是（ ）A解析端口和服务类型的对应关系B解析MAC 地址和端口的对应关系C解析IP 地址和域名的对应关系D解析IP 地址和MAC 地址的对应关系46. 在OSI 网络参考模型中，能够确定网络接头及其电器性能标准的是（ ）A传输层协议 B网络层协议 C数据链路层协议 D物理层协议47. 为了提高网络安全性、防止网络服务器遭受黑客攻击，目前经常采用的技术是（ ）A. 双机热备份技术 B. 生物特征识别技术 C数据加密技术 D防火墙技术48. 在下列网络调试命令中，可以用来测试两台机器之间是否有物理通路的是（ ）Anetstat B. ipconfig Cping Dtelnet49. IP 地址129.10.10.10 属于下列哪类IP 地址（ ）AD 类地址 BC 类地址 CB 类地址 DA 类地址50. 若干计算机使用交换机和双绞线、应用TCP/IP 协议组成了一个局域网，并通过一台路由器与互联网连接。在为计算机设置网络参数时，下列哪个网络参数没有必要进行设置（ ）ADNS 服务器 BIP 地址 CWINS 服务器 D默认网关A192.168.3.1003.ca.39.a0.01.75192.168.1.1000.fa.89.a4.01.90网络1数据包2192.168.1.20001.6a.75.66.0f.11192.168.10.10网络3网络2192.168.10.20002.ba.83.34.ab.9eB192.168.3.100数据包3数据包1路由器C路由器D第卷（非选择题 共140 分）二、判断题（本大题14 小题，每小题1 分，共14 分。将答案填涂在机读卡上，正确的填涂“”格，错误的填涂“”格）1计算机能够进行逻辑判断，并根据判断的结果选择相应的处理。这说明计算机具有自动控制能力。 （ ）2计算机断电后，RAM 存储的信息不会丢失，ROM 存储的信息会丢失。 （ ）3. 在Windows XP 中，回收站容量大小是固定的，不能调整。 （ ）4. 在Windows XP 中，任务栏可以放在桌面的四个边的任意边上。 （ ）5在Word 2003 中，如果需要对插入的图片作精确定位，那么图片与文字的环绕方式应该选择“浮于文字上方”。 （ ）6. 在Word 2003 中，使用“查找”命令时，可以区分全角和半角字符，也可以区分大小写字母。 （ ）7在Excel 2003 中，分类汇总的关键字段可以是多个字段。 （ ）8. 在Excel 2003 中，选中单元格按Delete 键，则单元格的内容被删除而格式保持不变。 （ ）9. 在Visual Basic 中，可以用LoadPicture 函数给图片框加载图片，但不能用此函数清除其中的图片。 （ ）10在Visual FoxPro 中，使用查询设计器创建的是一个包含SQL 的SELECT 语句的文本文件。 （ ）11从技术上看，可以将普通交换机视为一种多端口的网桥，该设备工作在数据链路层。 （ ）12由于网络使用了分层结构，所以当某层的实现技术发生变化时，与其相邻的层次必须进行相应变化，才能保证网络功能的正常实现。 （ ）13网络服务器上的DHCP 服务，其主要功能是进行IP 地址和域名之间的相互转换。（ ）14工作在数据链路层和网络层的设备都具有所在网络的唯一地址标识或能够判识所在层次的地址标识。 （ ）三、填空题（本大题共13 小题，每小题2 分，共26 分。请将答案填写在答题纸上）1进位计数制允许选用的基本数码的个数称为 。2冯诺依曼计算机体系中，中央处理器包含 和 。3计算机中所有信息都是以 形式存储的。4在Windows XP 中， 是内存的一块区域，用于各个应用程序之间相互交换信息。5在Word 2003 中，包含有最近使用过文档列表的是 菜单。6在Excel 2003 中，单元格E4 中有公式“=$C$3+D4”，将公式复制到E6 单元格中，单元格E6 中的公式为 。7. 在Visual Basic 中，文本框的默认属性是 。8. 在Visual Basic 中，代数式13 23 + +xx的算术表达式是 。9在Visual FoxPro 中，要屏蔽系统菜单，使用命令 。10. 在Visual FoxPro 中，一个表只能建立一个的是 索引。11. 在OSI 网络参考模型中，传输层传送信息的组织单位是 。12. 用来代表本机IP 地址的第一个字段的值是 （请填写十进制数）。13. （请填写设备名称）可以按不同的网络协议完成数据包格式的转换，从而将环型网络和总线型网络进行互连。四、根据已知的环境与题意，写出相应的Visual FoxPro 操作命令或SQL 语句，要求每小题用一条命令或语句完成（本大题共5 小题，每小题4 分，共20 分，请填写在答题纸上）。现有数据库“HETONG.DBC”，其中包含表“TAB_HETONG.DBF”，该表有以下字段：编号(C,10)、供方(C,50)、合同编号(C,10)、签订地点(C,50)、数量(N,10,0)，需方(C,50)。相应的数据库和表已打开，写出实现下述功能的命令(注意：每个命令只能写一条语句，多于一条不得分)。1.以“合同编号”为关键字建立降序的候选索引，索引名为“HT”,复合索引文件名为HTBH.CDX。（用Visual FoxPro 命令）2.将所有“供方”为“阳春白雪集团”的所有记录的“签订地点”改为“金阳大厦”（用Visual FoxPro 命令）3.查询统计“TAB_HETONG”表中不同需方“数量”的最大值，并将结果从打印机上打印出来。（用SQL 语句）计算机专业理论试题 第7 页 共 13 页4修改表“TAB_HETONG”的结构，删除“合同编号”字段的默认值。（用SQL 语句）5. 删除“TAB_HETONG”表中“供方”为“百得公司”或“数量”小于500 的记录。（用SQL 语句）五、程序分析（本大题共2 小题，每小题5 分，共10 分，读程序并分析结果，请填写在答题纸上）1阅读下面的Visual Basic 程序，循环体中的语句s = s + 2 共执行了 次。Private Sub Command1_Click()Dim a As Integer, b As Integer, c As IntegerDim i As Integer, s As Integera = 5: b = 2: c = 2: s = 0Do While b (TS-TA*2)*10SELECT 1SEEK B.借书证号IF TE(TS-27)*10 OR 职称教授?姓名+同志，您借的书已过期，请归还H=H+1ENDIFSELECT 2ENDIFSKIPENDDORETURNPROCEDURE JSPARAMETERS TA,TB,TC,TSTC=MAX(TA,TB)DO WHILE TC num2 Then k = num2 Else k = num1Do While i = kIf num1 Mod i = 0 And num2 Mod i = 0 Thennum = iEnd Ifi = i + 1LoopPrint numEnd Sub窗体启动后单击命令按钮，分别给num1 和num2 赋值为18 和27，输出变量num 的值为 。2分析下面Visual Basic 程序段,如图所示，界面中左侧是列表框（名称List1），显示省份名称，右侧从上向下分别是文本框1（名称Text1），文本框2（名称Text2），命令按钮（名称Command1）。Private Sub Command1_Click()Dim i As IntegerFor i = 0 To List1.ListCount - 1If Trim(Text1.Text) = List1.List(i) And List1.Selected(i) ThenText2.Text = Mid(List1.List(List1.ListIndex), 1, 2)Exit ForElseText2.Text = 其它End IfNext iEnd SubPrivate Sub Form_Load()List1.AddItem 河北省List1.AddItem 河南省List1.AddItem 湖北省List1.AddItem 山东省List1.AddItem 湖南省End Sub窗体启动后，选中列表框中“湖北省”项目，并在文本框1 中输入“湖北省”，单击命令按钮，文本框2 显示的内容是 。3有Visual ForPro 程序如下:CLEARINPUT 请输入数据： TO AXB?CAS(AXB,1)FUNCTION CASPARAMETERS nAmount,IsDWnDZS=CDE(RTRIM(LTRIM(STR(nAmount,18,2),.,)cHZDX=零壹贰叁肆伍陆柒捌玖cDW=分角元拾佰仟万拾佰仟亿拾佰仟万拾佰仟亿cRMBDX=nCd=LEN(nDZS)FOR I=1 TO LEN(nDZS)cNumbers=SUBSTR(cHZDX,INT(VAL(SUBSTR(nDZS,I,1)*2+1),2)计算机专业理论试题 第9 页 共 13 页IF IsDW=1cDWs=SUBSTR(cDW,nCd*2-1,2)ELSEcDWs=SPACE(0)ENDIFcRMBDX=cRMBDX+cNumbers+cDWSnCd=nCd-1ENDFORFOR I=LEN(nDZS)+1 TO 7cNumbers=SUBSTR(cHZDX,INT(VAL(SUBSTR(nDZS,I,1)*2+1),2)IF IsDW=1cDWs=SUBSTR(cDW,I*2-1,2)ENDIFcRMBDX=cNumbers+cDWS+cRMBDXENDFORRETURN cRMBDXFUNCTION CDEPARAMETERS nAmountY,nDot,nREPcRMBDE=FOR I=1 TO LEN(nAmountY)IF SUBSTR(nAmountY,I,1).cRMBDE=cRMBDE+SUBSTR(nAmountY,I,1)ENDIFENDFORRETURN cRMBDE运行上面的程序，输入123.4，显示的结果为4.现有2 个表，分别是“JSB.DBF”、“KCB.DBF”。其中“JSB”表的结构为：楼号(N,2,0)、教室名(C，5)、容纳人数(N,4,0)，是否占用(L)；“KCB”表的结构为：课程名(C,20)、选课人数(N,3,0),各表中数据如下：JSB.DBF记录号 楼号 教室名 容纳人数 是否占用1 1 1-304 120 .T.2 1 1-205 80 .T.3 2 2-103 70 .T.4 2 2-204 80 .F.5 3 3-103 30 .T.6 3 3-104 65 .F.7 3 3-201 100 .F.KCB.DBF记录号 课程名 选课人数1 计算机基础 352 操作系统 60有如下Visual FoxPro 程序：DIME JIZHI(1,1)SELECT 楼号,教室名,容纳人数,是否占用 FROM JSB INTO TABLE LINSHIALTER TABLE LINSHI ADD CHAZHI N(3,0)USEACCEPT 请输入课程名： TO KCMSELECT 1USE KCBINDEX ON 课程名 TAG ABCSEEK KCMSELECT 2USE LINSHIREPLACE ALL CHAZHI WITH 容纳人数-A.选课人数DELETE ALL FOR CHAZHIXABJIEGUO=XAB*3.5+(使用数-XAB)*10ELSEJIEGUO=使用数*3.5ENDIFELSEIF 使用数XABJIEGUO=XAB*3.5+(使用数-XAB)*10+50ELSEJIEGUO=使用数*3.5+50ENDIFENDIFTHISFORM.TEXT2.VALUE=XM+ +应收金额=+STR(JIEGUO)运行上面的表单，在Text1 中输入“王阳新”，选择单选按钮“10 楼以上”，单击“计算”选钮，则在Text2 中显示的是：七、Visual Basic 程序改错(本大题共2 小题，每题5 分，共10 分，每个程序有两个错误行，请在答题纸上写出错误行代码和对应的正确代码，改对一处得一处分，改错不减分。注：要把整行写完整)1下面的程序是利用随机函数产生10 个1 到30 之间的随机整数，然后把产生的这计算机专业理论试题 第11 页 共 13 页些整数放入数组b 中，并按一定规则放入数组a 中。存放数组a 中的规则是：（1）如果产生的是1 到9 之间（含1 和9）的数，则直接放入数组a 中。（2）如果产生的是大于9 的数，则按如下方法存放：偶数则把十位数字放入数组a中，奇数则把个位数字放入数组a 中。如：假设产生的整数是：22，17，18，9，10，24，1，23，25，22。放入数组a 中的数字是：2， 7, 1, 9, 1, 2, 1， 3, 5，2。程序中有两处错误，请将错误行和相应的正确行写在答题纸横线上。Option Base 1Private Sub Command1_Click()Dim a(10) As IntegerDim b(10) As IntegerDim i As IntegerDim num As IntegerFor i = 1 To 10num = Int(Rnd * 30)b(i) = numIf num = 1 And num a(j, col) Thent = a(i, col)a(i, col) = a(j, col)a(j, col) = tEnd IfNext jNext iPrintFor i = 1 To 3For j = 1 To 4Print a(i, j);Next jPrintNext iEnd Sub八、程序填空（本大题共7 个空，每空5 分，共35 分，按程序要求在答题纸上填入相应的内容，使程序完整正确）1(Visual Basic 题)下面的程序是输入偶数个字符的字符串给变量c，然后从字符串两端分别截取字符赋给c1 和c2，每次截取一个。如果是数字字符，则按“前端截取放前、后端截取放后”的方法存入数组a 中；如果是其它字符，则不存放。然后依次分别截取下一个字符，并用同样的方法处理，直到所有字符处理完为止。如输入的字符为12AB34C56D78，存入数组a 中的顺序为1,8,2,7,6,3,5,4。最后显示出来。请在空白位置填写正确的代码。Option Base 1Private Sub Command1_Click()Dim c As StringDim c1 As StringDim c2 As StringDim a(20) As IntegerDim i As IntegerDim j As IntegerDim k As Integerc = InputBox(c=)j = Len(c): i = 1k = 1Do While i = 0 And c1 = 0 And c2 R，输出从数1 到N 中按降序顺序取R 个自然数的所有组合.例如,N=5,R=3 时,有如下组合:5 4 35 4 25 4 15 3 25 3 15 2 14 3 24 3 14 2 13 2 1程序如下，请在空白位置填写正确的代码。DIME A(20)INPUT N= TO NINPUT R= TO RI=1(5)DO WHILE .T.IF IRIF A(I)R-IA(I+1)=A(I)-1I=I+
展开阅读全文