《计算机应用基础》期末练习题.docx
- 文档编号:9433327
- 上传时间:2023-05-19
- 格式:DOCX
- 页数:13
- 大小:63.54KB
《计算机应用基础》期末练习题.docx
《《计算机应用基础》期末练习题.docx》由会员分享,可在线阅读,更多相关《《计算机应用基础》期末练习题.docx(13页珍藏版)》请在冰点文库上搜索。
《计算机应用基础》期末练习题
期末综合练习题(2012-12)
一、单选题
1、下列语句中,可以调用Sub过程。
A.IFB.CallC.ForD.Dim
答案:
B
2、在HTML文档中,使用vBODY标记的性可以设置整
个网页的文字颜色。
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、使用标记vFONT设置文字属性,文字大小(字号)的缺省值
(也称“默认值”)为号。
A.1B.3C.5D.7
答案:
B
6、使标题“计算机程序设计”右对齐显示,ALIGN属性应为。
vH1ALIGN="">计算机程序设计v/H1>
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)
答案:
C
9、以下标识符中,可以作为有效VBScript变量名
A.you_namefalse答案:
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
y值为
14、设x="ABCDE",k=2,执行下列程序段后,变量
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=bEndIf
EndSub
b=a*2Callfnmax(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.4
B.3
C.2
D.1
答案:
C
x=InStr(s,"A")
Ifx=1Then
Xf—n*n
y="*"
Else
Ifx=2Then
..一11**11
y="**"
Else
Ifx=3Then
..一ll***ll
y="***"
Else
..一ll****ll
y="****"
EndIf
EndIf
EndIf
Document.Write(y)
答案:
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>1Thens=s+m
EndIf
Next
A.6B.7C.8D.9
答案:
D
3),然
20、以下程序段,由用户输入一个字符串(长度大于
后去掉头尾两个字符,剩余部分组成一个新的字符串。
如输入字符串为"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
22、由用户输入考试分数,判断该分数属于哪个等级,等级规定如下:
成绩V60――“不及格”,60W成绩V70――“及格”
70W成绩V80――“中”,80W成绩一一“优良”
某同学编程如下:
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
23、下列程序段用来求
答案:
C
放在m中。
m=a
EndIf
m=c
EndIf
m=d
EndIf
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=1x2X3+2x3X4+3x4x5+…+100x
101x102的值,某同学编程如下:
Dimk,t,s
Fork=2To101
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(扩展标记语言)是一种新兴的面向Wet应用的标记语言。
答案:
正确
27、设x="123ABC",则函数Left(x,Len(x)-3)的值为"ABC"。
答案:
错误
28、HTM1是一种用于制作网页的计算机高级语言。
答案:
错误
29、HTM文档的实质是ASCII(文本)文档。
答案:
正确
三、单选题[多问]
30、以下HTML代码定义了两段文字,第二段强制分成了两行,填写所缺部分。
第一段[1]
[2]第二段的第一行[3]
第二段的第二行
[1]A.
B.C.
D.
[2]A.
B.
[3]A.B.
C.
D.
ADC
31、要在HTMLM面上显示如下数字图案:
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,cs=0: c=1
Fork=1To10000s=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)Ai)
Next
Document.Write("s="&s)
&&&&&&&&&&&&&
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机应用基础 计算机 应用 基础 期末 练习题