《计算机应用基础》期末练习题.docx

《计算机应用基础》期末练习题.docx

《《计算机应用基础》期末练习题.docx》由会员分享，可在线阅读，更多相关《《计算机应用基础》期末练习题.docx（11页珍藏版）》请在冰豆网上搜索。

《计算机应用基础》期末练习题

期末综合练习题（201２-12）

一、单选题

1、下列语句中，_____可以调用Sub过程。

A.IFB.CallC.ForD.Dim

答案：

B

2、在HTML文档中，使用标记的______属性可以设置整个网页的文字颜色。

A.FACEB.BGCOLORC.TEXTD.COLOR

答案：

C

3、要将下列文字“Web网页”设置为粗体,填写所缺部分（2个空格填写相同内容）。

<______>Web网页

A.IB.SUPC.UD.B

答案：

D

4、下列的简单HTML文档，在浏览器中显示的页面内容是______。

<HTML;>

A.B.

　C.简单HTML文档D.<HTML;>

答案：

B

5、使用标记设置文字属性，文字大小（字号）的缺省值（也称“默认值”）为______号。

A.1B.3C.5D.7

答案：

B

6、使标题“计算机程序设计”右对齐显示，ALIGN属性应为______。

计算机程序设计

A.centerB.leftC.rightD.width

答案：

C

7、设x="ABCdefg"，则函数Mid（Right（x,3）,1,2）的值为______。

A."BC"B."ef"C."def"D."EF"

答案：

B

8、设x="ABCabcdABCD"，s="AB"，执行下列语句后，变量y的值是_____。

y=Len（x）-Instr（3,x,s）

A.5B.6C.3D.4

答案：

C

9、以下标识符中，_______可以作为有效VBScript变量名。

A.you_nameB.forC.younameD.false

答案：

A

10、要产生[50,60]（含50和60）的随机整数应使用______表达式。

A.Int（10*Rnd+50）B.Int（11*Rnd+50）

C.Int（60*Rnd）D.Int（50*Rnd+11）

答案：

B

11、以下哪条语句能实现变量x加１？

A.Document.write（x=x+1）B.x=1

C.Document.write（x+1）D.x=x+1

答案：

D

12、设x=100，下列语句执行后，输出结果是______。

Document.Write（"x="&x）

A.x=xB.100=100C.x=100D.100=x

答案：

C

13、要求出当前日期的月份数，可以使用函数______。

A.Month（Date）B.Month（#2006/12/30#）

C.Month（）D.Day（Date）

答案：

A

14、设x="ABCDE"，k=2，执行下列程序段后，变量y值为______。

a=x+"VBScript"

y=Len（a）+Len（Mid（a,2,k+3）+"ABC"）

A.21B.22C.23D.24

答案：

A

15、下列程序执行后，输出结果是______。

Subfnmax（a,b,c）

Ifa>bThen

c=a

Else

c=b

EndIf

EndSub

Dima,b,c

a=3:

b=a*2

Callfnmax（a,b,c）

Document.Write（c+1）

A.3B.6C.7D.8

答案：

C

16、设a="3",执行下列语句后，变量s的值是______。

s=2*Cint（a）

Ifs>5Thens=s-3

Ifs>4Then

s=s+1

Else

s=s-1

EndIf

A.4B.3C.2D.1

答案：

C

17、设s="abcdABCD"，执行以下语句后，输出结果是_____。

x=InStr（s,"A"）

Ifx=1Then

y="*"

Else

Ifx=2Then

y="**"

Else

Ifx=3Then

y="***"

Else

y="****"

EndIf

EndIf

EndIf

Document.Write（y）

A.*B.**C.***D.****

答案：

D

18、下列程序段运行后，假设按提示输入字符串"ABCD"，则输出结果是______。

t=InputBox（"输入字符串"）

c=t&Lcase（Mid（t,4））

s=Right（c,2）+Mid（c,2,2）

Document.Write（s）

A.DdBCB.BCDd

C.DdCDD.DdB

答案：

A

19、执行下列程序段后，变量s的值是______。

s=0

Form=1To4

Ifm>1Then

s=s+m

EndIf

Next

A.6B.7C.8D.9

答案：

D

20、以下程序段，由用户输入一个字符串（长度大于3），然后去掉头尾两个字符，剩余部分组成一个新的字符串。

如输入字符串为"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）

答案：

B

21、按提示依次输入三个数，求这三个数的倒数之积。

如输入2、2、3，则计算式子（1/2）*（1/2）*（1/3）的结果。

填写所缺部分。

t=1

Forn=1To3

x=Csng（InputBox（"输入数据"））

______

Next

Document.Write（t）

A.t=1/xB.t=t*（1/n）

C.t=t/xD.t=t*x

答案：

C

22、由用户输入考试分数，判断该分数属于哪个等级，等级规定如下：

成绩＜60——“不及格”，60≤成绩＜70——“及格”

70≤成绩＜80——“中”，80≤成绩——“优良”

某同学编程如下：

Dimx,s

x=Cint（InputBox（"输入考试分数"））

Ifx>=70Then

Ifx<=80Then

s="中"

Else

s="优良"

EndIf

Else

Ifx>=60Then

s="及格"

Else

s="不及格"

EndIf

EndIf

Document.Write（"该成绩等级是：

"&s）

测试时发现程序有错，需要修改，请从下面修改方法中选择一个正确选项。

　A.把语句Ifx>=70Then改为Ifx>70Then

B.把语句Ifx>=70Then改为Ifx>=80Then

C.语句Ifx<=80Then应改为Ifx<80Then

　D.语句Ifx>=60Then应改为Ifx>=60Andx<70Then

答案：

C

23、下列程序段用来求a、b、c、d四个数中的最大数，结果存放在m中。

Ifa>bThen'第1个条件语句

m=a

EndIf

Ifm

m=c

EndIf

Ifm

m=d

EndIf

调试时发现，当a、c或d为大数时程序运行结果正确，但当b为大数时运行结果错误。

请从下面的四个修改方案中选择一个正确方案。

A.第1个条件语句中的语句m=a应改为m=b

B.第1个条件语句应改为

Ifa>bThen'第1个条件语句

m=b

Else

m=a

EndIf

C.第1个条件语句应改为

Ifa>bThen'第1个条件语句

m=a

Else

m=b

EndIf

D.第3个条件语句中的语句m=d应改为d=m

答案：

C

24、为计算t=1×2×3+2×3×4+3×4×5+…+100×101×102的值，某同学编程如下：

Dimk,t,s

t=0

Fork=2To101

s=k*（k+1）

t=t+s

Next

Document.Write（"t="&t）

在调试时发现运行结果有错误，需要修改。

请从下面的四个修改方案中选择一个正确选项。

A.语句Fork=2To101应改为Fork=1To100

B.语句Fork=2To101应改为Fork=1To101

C.把语句s=k*（k+1）改为s=k*（k-1）*（k+1）

D.循环体中两条赋值语句的顺序错误，应调换位置，即改为

t=t+s

s=k*（k+1）

答案：

C

25、下列程序运行后，假设通过输入对话框输入数值67，则显示结果是_____。

Subsubcal（a）

b=a\6+aMod13

Document.Write（b）

EndSub

Dimx

x=Cint（InputBox（"输入一个数"））

Callsubcal（x）

A.12B.13C.14D.15

答案：

B

二、判断题

26、XML（扩展标记语言）是一种新兴的面向Web应用的标记语言。

答案：

正确

27、设x="123ABC"，则函数Left（x,Len（x）-3）的值为"ABC"。

答案：

错误

28、HTML是一种用于制作网页的计算机高级语言。

答案：

错误

29、HTML文档的实质是ASCII（文本）文档。

答案：

正确

三、单选题[多问]

30、以下HTML代码定义了两段文字，第二段强制分成了两行，填写所缺部分。

第一段____[1]____

____[2]____第二段的第一行____[3]____

第二段的第二行

[1]A.

[3]A.B.

C.
D.

答案：

ADC

31、要在HTML页面上显示如下数字图案：

11111

2222

333

44

5

该HTML文档的代码如下,请填写所缺部分。

Fori=1To5
Forj=____[1]____
Document.Write（____[2]____）
____[3]____
Document.Write（"
"）
Next

[1]A.1ToIB.1To5C.1Toi+1D.iTo5

[2]A.jB.IC.i+1D."1"

[3]A.EndIfB.EndSubC.NextD.EndFor

答案：

DBC

四、填空题[编程求结果]

32、通过编程求出结果。

求级数

S=1/（1*1+1）+1/（2*2-1）+1/（3*3+1）+1/（4*4-1）+…

+1/（n*n+1）+1/（（n+1）*（n+1）-1）+…

的前10000项之和，其结果为________（取2位小数，第3位小数四舍五入）。

答案：

1.22（数值）

程序:

（方法1）

dims,k,c
s=0:
c=1
Fork=1To10000
s=s+1/（k*k+c）
c=-c
Next
Document.Write（"s="&s）

程序:

（方法2）

dims,i
s=0
Fori=1To10000
s=s+1/（i*i-（-1）^i）
Next
Document.Write（"s="&s）

&&&&&&&&&&&&&