#《计算机应用基础》期末练习题.docx
《#《计算机应用基础》期末练习题.docx》由会员分享,可在线阅读,更多相关《#《计算机应用基础》期末练习题.docx(11页珍藏版)》请在冰豆网上搜索。
#《计算机应用基础》期末练习题
期末综合练习题(2012-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文档<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加1?
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
Ifmm=c
EndIf
Ifmm=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.
B.C.
D.
[2]A.
B.
C.D.[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)
&&&&&&&&&&&&&