信息技术会考模拟题汇总1

For b = 0 To ①

n = 67008 + ② * 100 + b * 10

If n Mod 78 = 0 ③ n Mod 67 = 0 Then Print ④ End If Next b Next a

请将应填写的内容写在下面相应的空格内并运行程序写出该号码(每空3分，共12分)。

①_____________ ②_____________ ③_____________ ④ _____________

5．编写程序计算表达式a=|-3.6|+123×sin67°的值（圆周率∏的值取3.14，计算结果用取整函数保留整数部分，每小题3分，共12分）。

① |-3.6|写成VB表达式应为：_____________________ ② sin67°写成VB表达式应为：______________________ ③ 在VB环境下编写程序并运行： Private Sub Command1_Click() Dim a As Single

a = Abs(-3.6) + 123 * Sin(67 * 3.14 / 180) a = Int(a) Print a End Sub

④ 该程序的运行结果是：____________

6．启动VB,打开工程文件“C:\\MyExam\\VB6.vbp”，完成如下算法设计：

该程序的功能是求S=10+20+30+??+100.请将程序缺失部分“——”补充完整，并将“——”字符删除，正确运行程序后，保存文件并退出VB。 Private Sub Command1_Click()

Dim S as Single Dim i as Integer

For i = 10 To 100 Step ①______ S= ②______ Next i Print S End Sub

7．启动VB，打开工程文件“C：\\MyExam\\VB1.vbp”，完成如下算法设计：

以已知变量X的值是1987，下列程序的功能是求X的各位数字之和S，其中a存放的事个位数字，b存放的是十位数字，c存放的是百位数字，d存放的事千位数字。请将程序缺失部分“—”补充完整，并将“—”字符删除，正确运行程序后，保存文件并退出VB。 Private Sub Command1_Click()

Dim a as Integer Dim b as Integer Dim c as Integer

9

Dim d as Integer Dim X as Integer Dim S as Integer X = 1987

a = ①_____________ b = ②_____________ c = ③_____________ d = ④_____________ S = a+b+c+d Print S End Sub

8．启动VB，打开工程文件“C：\\MyExam\\VB4.vbp”，完成如下算法设计：

编写一元二次方程X2+3X+2=0的求解程序，要求能够判断方程是否有限，如果没有根则给出相应的提示信息。请将程序缺失部分“—”补充完整，并将“—”字符删除，正确运行程序后，保存文件并退出VB。 Private Sub Command1_Click() Dim a as Integer

Dim b as Integer Dim c as Integer Dim d as Integer a = 1 b = 3 c = 2

d = ①______________ If ②_______ Then x1 = ③_____________ x2 = ④_____________ Print x1,x2 Else

Print \原方程无实根！\End If End Sub

WORD

46、启动Word，打开文件“C:\\MyExam\\中国航天事业.doc”，完成下列操作后，保存并退出。 （1）将标题设为“黑体”，字号设为“三号”，居中对齐； （2）将纸张大小设置为A4，左右页边距设为2厘米；

（3）在文档末尾插入图片C:\\MyExam\\earth.jpg，设置板式为“紧密型”

40、启动Word，打开文件“C:\\MyExam\\地球一小时.doc”，完成下列操作后，保存并退出。 （1）将正文段落设置为首行缩进2个字符，行距设置为固定值20磅； （2）在文章末尾插入艺术字“地球一小时”，设置版式为四周型； （3）插入页眉“地球一小时”。

10

EXCEL

47、使用excel打开文件“C:\\MyExam\\excel.xls”进行如下操作，完成操作后请保存并退出文件。

（1）将标题行行高设置为20；

（2）使用公式计算每位职工的平均工资，保留2位小数； （3）按平均工资由低到高进行排序。

48、使用excel打开文件“C:\\MyExam\\excel.xls”进行如下操作，完成操作后请保存并退出文件。

（1）将标题所在单元格区域“A1，H1”合并居中，垂直对齐设为“靠下”； （2）使用函数计算每个同学的总分； （3）按总分由高到低进行排序。

11