《计算机应用基础》期末综合练习题(2012-12)_第1页
《计算机应用基础》期末综合练习题(2012-12)_第2页
《计算机应用基础》期末综合练习题(2012-12)_第3页
《计算机应用基础》期末综合练习题(2012-12)_第4页
《计算机应用基础》期末综合练习题(2012-12)_第5页
已阅读5页，还剩11页未读， 继续免费阅读

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、期末综合练习题（201-12）一、单选题1、下列语句中，_可以调用Sub过程。 A. IFB. CallC. ForD. Dim答案：B2、在HTML文档中，使用<BODY>标记的_属性可以设置整个网页的文字颜色。 A. FACE B. BGCOLOR C. TEXT D. COLOR答案：C3、要将下列文字“Web网页”设置为粗体,填写所缺部分（2个空格填写相同内容）。 <P> <_> Web网页 </_> </P> A. IB. SUPC. UD. B答案：D4、下列的简单HTML文档，在浏览器中显示的页面内容是_。 <HT

2、ML> <HEAD><TITLE> 简单HTML文档 </TITLE></HEAD> <BODY> &lt;HTML;&gt;</BODY> </HTML> A. <HTML>B. <HTML;>C. 简单HTML文档 D. &lt;HTML;&gt;答案：B5、使用标记<FONT>设置文字属性，文字大小（字号）的缺省值（也称“默认值”）为_号。 A. 1 B. 3 C. 5 D. 7答案：B6、使标题“计算机程序设计”右对齐显示，ALI

3、GN属性应为_。 <H1 ALIGN="_"> 计算机程序设计 </H1> A. centerB. leftC. rightD. width答案：C7、设x="ABCdefg"，则函数 Mid(Right(x,3),1,2) 的值为_。 A. "BC"B. "ef"C. "def"D."EF"答案：B8、设x="ABCabcdABCD"，s="AB"，执行下列语句后，变量y的值是_。 y=Len(x) - Ins

4、tr(3,x,s) A. 5 B. 6 C. 3 D. 4答案：C9、以下标识符中，_可以作为有效VBScript变量名。 A. you_name B. for C. you name D. false 答案：A10、要产生50,60(含50和60)的随机整数应使用_表达式。 A. Int(10 * Rnd + 50)B. Int(11 * Rnd + 50) C. Int(60 * Rnd)D. Int(50 * Rnd + 11)答案：B11、以下哪条语句能实现变量x加？ A. Document.write(x=x+1)B. x = 1 C. Document.write(x+1) D.

5、x = x + 1答案：D12、设 x=100，下列语句执行后，输出结果是_。 Document.Write("x=" & x) A. x=xB. 100=100C. x=100D. 100=x答案：C13、要求出当前日期的月份数，可以使用函数_。 A. Month(Date)B. Month(#2006/12/30#) C. Month()D. Day(Date)答案：A14、设 x="ABCDE"，k=2，执行下列程序段后，变量y值为_。 a = x + "VBScript" y = Len(a) + Len(Mid(a,

6、 2, k+3) + "ABC") A. 21 B. 22 C. 23 D. 24答案：A15、下列程序执行后，输出结果是_。 <HTML><HEAD> <TITLE>过程试题</TITLE> <SCRIPT LANGUAGE="VBScript"> Sub fnmax(a,b,c) If a>b Then c = a Else c = b End If End Sub </SCRIPT></HEAD> <BODY><SCRIPT LANGUAGE

7、="VBScript"> Dim a,b,c a = 3 : b = a*2 Call fnmax(a, b, c) Document.Write(c+1) </SCRIPT> </BODY></HTML> A. 3 B. 6 C. 7 D. 8答案：C16、设 a="3",执行下列语句后，变量s的值是_。 s = 2*Cint(a) If s>5 Then s = s - 3 If s>4 Then s = s + 1 Else s = s - 1 End If A. 4 B. 3 C. 2 D.

8、1答案：C17、设 s="abcdABCD"，执行以下语句后，输出结果是_。 x = InStr(s,"A") If x= 1 Then y = "*" Else If x=2 Then y = "*" Else If x=3 Then y = "*" Else y = "*" End If End If End If Document.Write(y) A. * B. * C. * D. *答案：D18、下列程序段运行后，假设按提示输入字符串"ABCD"

9、，则输出结果是_。 t = InputBox("输入字符串") c = t & Lcase(Mid(t,4) s = Right(c,2) + Mid(c,2,2) Document.Write(s) A. DdBC B. BCDd C. DdCD D. DdB答案：A19、执行下列程序段后，变量s的值是_。 s = 0 For m = 1 To 4 If m>1 Then s = s + m End If Next A. 6 B. 7 C. 8 D. 9答案：D20、以下程序段，由用户输入一个字符串（长度大于3），然后去掉头尾两个字符，剩余部分组成一个新的字

10、符串。如输入字符串为"ABCDEF"，处理成的字符串为"BCDE"。 完善下列程序代码。 x = InputBox("输入一个字符串") n = Len(x) y = _ Document.Write("组成的新字符串为：" & y) A. Right(x,n-1) B. Mid(x,2,n-2) C. Mid(x,2,n-1) D. Mid(x,n-2)答案：B21、按提示依次输入三个数，求这三个数的倒数之积。 如输入2、2、3，则计算式子(1/2)*(1/2)*(1/3)的结果。 填写所缺部分。 t =

11、 1 For n=1 To 3 x = Csng(InputBox("输入数据") _ Next Document.Write(t) A. t = 1/x B. t = t*(1/n) C. t = t/x D. t = t*x答案：C22、由用户输入考试分数，判断该分数属于哪个等级，等级规定如下： 成绩60“不及格”， 60成绩70“及格” 70成绩80“中”， 80成绩“优良” 某同学编程如下： Dim x, s x = Cint(InputBox("输入考试分数") If x>=70 Then If x<=80 Then s = &qu

12、ot;中" Else s = "优良" End If Else If x>=60 Then s = "及格" Else s = "不及格" End If End If Document.Write("该成绩等级是：" & s) 测试时发现程序有错，需要修改，请从下面修改方法中选择一个正确选项。A.把语句 If x>=70 Then 改为 If x>70 Then B.把语句 If x>=70 Then 改为 If x>=80 Then C.语句 If x<=80

13、 Then 应改为 If x<80 ThenD.语句 If x>=60 Then 应改为 If x>=60 And x<70 Then答案：C23、下列程序段用来求a、b、c、d四个数中的最大数，结果存放在m中。 If a>b Then '第1个条件语句 m=a End If If m<c Then '第2个条件语句 m=c End If If m<d Then '第3个条件语句 m=d End If 调试时发现，当a、c或d为大数时程序运行结果正确，但当b为大数时运行结果错误。请从下面的四个修改方案中选择一个正确方案。 A.

14、第1个条件语句中的语句m=a应改为m=b B. 第1个条件语句应改为 If a>b Then '第1个条件语句 m=b Else m=a End If C. 第1个条件语句应改为 If a>b Then '第1个条件语句 m=a Else m=b End If D. 第3个条件语句中的语句m=d应改为d=m答案：C24、为计算t = 1×2×3 + 2×3×4 + 3×4×5 + + 100×101×102的值，某同学编程如下： Dim k,t,s t = 0 For k=2 To 10

15、1 s = k*(k+1) t = t + s Next Document.Write("t=" & t) 在调试时发现运行结果有错误，需要修改。请从下面的四个修改方案中选择一个正确选项。 A. 语句For k=2 To 101 应改为 For k=1 To 100 B. 语句For k=2 To 101 应改为 For k=1 To 101 C. 把语句s = k*(k+1) 改为 s = k*(k-1)*(k+1) D. 循环体中两条赋值语句的顺序错误，应调换位置，即改为 t = t + s s = k*(k+1)答案：C25、下列程序运行后，假设通过输入对话框

16、输入数值67，则显示结果是_。 <HTML><HEAD> <TITLE> 数据处理 </TITLE> <SCRIPT LANGUAGE="VBScript"> Sub subcal(a) b = a 6 + a Mod 13 Document.Write(b) End Sub </SCRIPT></HEAD> <BODY><SCRIPT LANGUAGE="VBScript"> Dim x x = Cint(InputBox("输入一个数

17、") Call subcal(x) </SCRIPT></BODY></HTML> A. 12 B. 13 C. 14 D. 15答案：B二、判断题26、XML（扩展标记语言）是一种新兴的面向Web应用的标记语言。答案：正确27、设x="123ABC"，则函数 Left(x,Len(x)-3) 的值为"ABC"。答案：错误28、HTML是一种用于制作网页的计算机高级语言。答案：错误29、HTML文档的实质是ASCII（文本）文档。答案：正确三、单选题多问30、以下 HTML 代码定义了两段文字，第二段强制分成

18、了两行，填写所缺部分。 <P> 第一段 _1_ _2_ 第二段的第一行 _3_ 第二段的第二行 </P> 1 A. </P>B. <P>C. <BR>D. <FONT> 2 A. <BR>B. </P>C. </FONT>D. <P> 3 A. </FONT>B. <P>C. <BR>D. </P> 答案：ADC31、要在HTML页面上显示如下数字图案：111112222333445 该HTML文档的代码如下,请填写所缺部分。&

19、lt;HTML><HEAD></HEAD><BODY><PRE><SCRIPT LANGUAGE="VBScript"> For i=1 To 5 For j= _1_ Document.Write(_2_) _3_ Document.Write("<BR>") Next</SCRIPT></PRE></BODY></HTML> 1 A. 1 To IB. 1 To 5C. 1 To i+1D. i To 52 A. jB. IC. i + 1D. "1"3 A. End IfB. End SubC. NextD. End For答案：DBC四、填空题编程求结果32、通过编程求出结果。求级数 S = 1/(1*1+1) + 1/(2*2-1) + 1/(3*3+1) + 1/(4*4-1) + + 1/(n

人人文库> 全部分类> 教育资料 > 课件下载

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论