高中信息技术上机操作题

计算机上机操作模拟题（一） 一、Windows1、首先在你自己的考试文件夹下创建一个名字为Kaoshi的子文件夹，然后将已经在你的考试文件夹下的your.txt文件移动到Kaoshi文件夹下，并将其名字改为my.txt。2、在Kaoshi文件夹下创建一个名字为“CALC”的快捷方式，使其指向附件“计算器”应用程序。3、运行上面创建的“CALC”的快捷方式，将打开的计算器窗口（标准型）以“计算器对话框”为文件名、24位位图格式保存到Kaoshi 文件夹下。二、WORD打开考生考试文件夹下的test2.doc文件，按下列所给要求完成操作后原名存回。(1) 按样张在文档首部插入自选图形“澳门旅行”，文字为小二号、华文行楷。(2) 将第一、第二段的段前设置为6磅、行距为1.3倍，字体为小四号；整个文档的页面边距（上、下、左、右）均设为3厘米，页眉为2厘米。(3) 按样张插入图片“旅游.jpg”(该图片已在你的考试文件夹中) ，高度和宽度分别调整为3.6厘米和1.5厘米，并实现图文混排。(4) 增加页眉“南海之滨”，要求文字取14号楷体，加下划双波浪线，并在页面宽度范围内分散对齐。(5) 在文档的最后创建如样张所示的文本框，标题“旅游指南”取20号、隶书、加粗、居中显示，并增加项目符号（项目符号本身的字号为12，文字为14号隶书）。三、EXCEL打开考生考试文件夹下的test2.xls文件，按下列所给要求完成操作后原名存回。(1) 取消数据列表中“利润”列的隐藏，隐藏F列。(2) 在E21单元格中计算公司的总利润，并计算每一个分公司的利润占公司总利润的比例,数据采用2位小数带百分比的格式。(3) 对列表以所属国家为第一关键字降序，营收为第二关键字升序排序，但是总利润行不参与排序。(4) 按样张（左图）对表格的内容设置对齐。(5) 对sheet2工作表按“所属国家”求利润平均值，汇总表的形式如（右图）所示。四、PowerPoint打开考生考试文件夹下的test2.ppt文件，按下列所给要求完成操作后原名存回。(1) 为第1张幻灯片设置背景“白色大理石”，并对标题“2006汽车展”创建超链接，链接对象为第三张幻灯片，链接后的文字改为兰色。(2) 为所有的幻灯片添加页脚，位置为底部居中、内容为“欢迎参观汽车展”，并在幻灯片右下角显示页码。(3) 在第2张幻灯片的右上角添加一个“动作按钮”（如样张所示），鼠标在其上移过时跳转到最后一张幻灯片，并有“鼓掌”伴音。(4) 对最后一张幻灯片中的3个对象设置动画效果，出场顺序和动画效果见下表。 出场顺序 对象 动画效果 1 标题“法拉利” 上部逐字切入，并有“照相机”伴音 2 图片 溶解、单击后隐藏 3 带项目符号的文本 阶梯状、右下 (5) 删除第3张幻灯片；再在原处插入一张“只有标题”版式的幻灯片，标题内容“视频欣赏”，在标题下方插入影视文件Elephant.avi（已在你的考试文件夹中），适当调整图形对象大小如样张，要求每次播放该幻灯片时循环自动播放该影视片段。五、IE和Outlook的使用1、使用任何搜索引擎，分别查找：同时包含“香港”、“旅行社”两个关键字的网页；包含“旅行社”关键字,但不包含“春秋旅行社”的网页。 2、将IE浏览器默认的主页设为上海热线网站地址 ，并登录该站点，将主页下载到你自己的考试文件夹中。3、使用Outlook Express，按下面要求撰写并发送电子邮件：收件人：chen@sina.com.cn和xie@126.com（必须选择两个实际存在的收件信箱）主题：春游邮件内容：信息学院2006年春季二日游活动行程安排已定，详细情况请查看附件。附件：massage.txt（已在考试文件夹中）。4、使用Outlook Express接收由zhangshan@163.com（必须实际存在），阅后再转发给lisi@hotmail.com（必须实际存在）。

下面有两到Vb操作题，我是一名要参加今年信息技术学考的高中生，希望大家帮一下我！Thanks！

第一题：① n

第二题：

Private Sub Command1_Click()

Timer1.Interval = 500

Timer1.Enabled = True

End Sub

Private Sub Command2_Click()

Timer1.Enabled = False

End Sub

Private Sub Timer1_Timer()

Dim r As Integer, g As Integer, b As Integer

r = Int(Rnd * 256)

g = Int(Rnd * 256)

b = Int(Rnd * 256)

Text1.BackColor = RGB(r, g, b)

End Sub

重庆市高中信息技术会考题库选择题和填空题以及操作题

重庆市信息技术会考题（Pascal部分复习资料）

一、填空题

1、Sqrt(4)的值为（ 2.0 ）（保留一位小数）。

2、 ‘A’‘a’的值为（ false ）。

3、下列标识符哪个是合法的？（A ）

A.x1 B.a(c) C.var D.123

4、Pascal语言中的赋值号为（ := ）。

5、用Pascal语言表达式表示x为偶数（ odd(x)=false ）。

6、Ord(37)的值为（ 37 ）。

7、-15 Mod 4的值为（ -3 ）。

8、已知Chr(97)的值为字母a，则Chr(100)的值为字母（ d ）。

9、Turbo Pascal 7.0中，Integer类型的取值范围为（ -32768 ）到32767。

10、Pascal语言中，实现循环结构的语句主要有（ For ）语句，While语句和Repeat语句。

11、16 Div 5的值为（ 3 ）。

12、Odd(24)的值为（ false ）。

13、用Pascal语言表达式表示I被J整除

（ I mod J=0 ）。

14、机器语言仅由0和（ 1 ）两个代码组成。

15、Round(9.5)的值为（ 10 ）。

16、用Pascal语言表达式表示X0或X=10

（ x0 or x=10）。

17、Int(24.9)的值为（ 24 ）。

18、所谓复合语句，就是指用（ begin ）和End括起来的多条语句的统称。

19、Trunc(12.3)的值为（ 12 ）。

20、b2-4ac的Pascal语言表达式为（ b*b-4*a*c ）。

21、Pascal语言中，循环体至少执行一遍的循环语句是（ repeat ）语句

22、Round(10.4)的值为（ 10 ）。

23、1/3a的Pascal语言表达式为（ 1/3*a ）。

24、Pascal语言中，实现计数循环一般用（ For ）语句。

25、用Pascal语言表达式表示1≤a≤10

（ a=1 and a=10 ）。

26、Abs(-3.1)的值为（ 3.1 ）。

27、Pascal语言中，定义实型变量的关键字是（ real ）

28、120 Div 3 Mod 10的值为（ 0 ）。

29、Succ(‘c’)的值为（ d ）。

30、Pascal语言的关系运算符中，“不等于”运算符为（ ）。

31、Not(11+2232)的值为（ false ）。

错误信息Error 85：“；” expected表示程序中可能缺少的符号是（ ; ）。

32、Pred(‘C’)的值为（ B ）。

33、(a+b)h/2的Pascal语言表达式为

（ (a+b)*h/2 ）。

34、顺序结构中，每一条Pascal语句只执行（ 1）次。

35、已知Ord(‘A’)=65，则Ord(‘D’)=（ 68 ）。

36、a2-b2的Pascal语言表达式为（ a*a-b*b ）。

37、错误信息Error 91：“:=” expected表示程序中可能缺少的符号是（ := ）。

38、Succ(Pred(2))的值为（ 2 ）。

39、下列标识符哪个是合法的？（A ）

A.abc B.x# C.begin D.1a

40、用Pascal语言表达式表示a为奇数（ odd(a)=true ）。

41、Sqr(4)的值为（ 2 ）。验证

42、Chr(Ord(‘h’))的值为（ h ）。

43、（52）And (3=6)的值为（ true ）。

44、常量说明以（ const ）作标志。

二、程序阅读。

1、下列程序输出结果为（ 4 ）。

Var

M,N:Integer;

Begin

M:=0;

For N:=2 to 3 do

M:=M+2;

Write(M);

End.

2、下列程序输出结果为（ 9 ）。

Var

A,B,C:Integer;

Begin

A:=5;

B:=4;

C:=A*A-B*B;

Writeln(C);

End.

6、下列程序输出结果为（ 256 ）。

Var

Y:Integer;

Begin

Y := 2;

WHILE (Y=32) DO

Y := Y*Y;

Writeln(Y);

End.

7、下列程序输出结果为（ 40 ）。

Var

A:Integer;

Begin

A:=100;

A:=A+20;

A:=A Div 3;

Writeln(A);

End.

11、下列程序输出结果为（ 200 ）。

Var

X,I:Integer;

Begin

X:=0;

For I:=1 to 100 do

X:=X+2;

Writeln(X);

End.

12、下列程序输出结果为（ -1 ）。

Var

X,Y:Integer;

Begin

X:=-100;

If (X0) Then

Y:=-1

Else

Y:=1;

Writeln(Y);

End.

14、输入数据：0 2，下列程序输出结果为（ 1 ）。

Var

X,Y:Integer;

Begin

Y:=0;

X:=1;

While X0 Do

Begin

Y:=Y+X;

Read(x);

End;

Write(Y);

End.

15、下列程序输出结果为（ 10 ）。

Var

X,Y:Integer;

Begin

X:=-10;

If X0 Then

Y:=-X

Else

Y:=X;

Writeln(Y);

End.

19、下列程序输出结果为（ abcd ）。

Var

Ch:Char;

Begin

For Ch:=‘b' to ‘e' do

Write(pred(ch));

End.

20、下列程序输出结果为（ Y ）。

Var

A:Integer;

Begin

A:=11;

If Odd(A) Then

Writeln(‘Y')

Else

Writeln(‘N');

End.

24、下列程序段的输出结果为（ A ）。

Var

Score:Integer;

Ch:Char;

Begin

Score:=80;

Case Score Div 10 Of

10,9,8:Ch:= ‘A';

7,6:Ch:= ‘B';

Else Ch:= ‘C';

End;

Writeln(Ch);

End.

25、输入数据：-9，下列程序输出结果为（ =0 ）。

Var

A:Integer;

Begin

Read(A);

If (A0) Then

Write(‘0')

Else

Write(‘=0');

End.

29、下列程序段的输出结果为（ 12 ）。

Var

I:Integer;

Begin

I:=0;

While (I10) Do

I:=I+3;

Writeln(I);

End.

30、下列程序段的输出结果为（ 3.14 ）。

Const

PI=3.14;

Var

Area,R:Real;

Begin

R:=1;

Area:=PI*R*R;

Writeln(Area:4:2);

End.

34、下列程序段的输出结果为（ 24 ）。

Var

S,I:Integer;

Begin

S:=1;

For I:=1 To 4 Do

S:=S*I;

Writeln(S);

End.

35、下列程序段的输出结果为（ 1 ）。

Var

A,B:Integer;

Begin

A:=5;

If Odd(A) Then

B:=1

Else

B:=2;

Writeln(B);

End. 38、下列程序段的输出结果为（ 4 ）。

Var

S,N:Integer;

Begin

N:=1234;

S:=0;

While (N0) Do

Begin

N:=N Div 10;

S:=S+1;

End;

Writeln(S);

End.

39、下列程序段的输出结果为（ N ）。

Var

A:Integer;

Begin

A:=17;

If (A Mod 2=0) Then

Writeln(‘Y')

Else

Writeln(‘N');

End

。

40、下列程序段的输出结果为（ 15 ）。

Var

S,I:Integer;

Begin

I:=1;

S:=0;

Repeat

S:=S+I;

I:=I+1;

Until I5;

Writeln(S);

End.

41、下列程序段的输出结果为（ 4 , 3 ）。

Var

A,B:Integer;

Begin

A:=3;

B:=4;

A:=A+B;

B:=A-B;

A:=A-B;

Writeln(A,B);

End.

44、下列程序段的输出结果为（ 100 ）。

Var

S,I:Integer;

Begin

S:=0;

For I:=10 Downto 1 Do

S:=S+10;

Writeln(S);

End.

45、下列程序段的输出结果为（ 0 ）。

Var

T:Integer;

Begin

T:=3;

T:=T*100;

T:=T Mod 3;

Writeln(T);

End.

下列程序段的输出结果为（ Sunday ）。

Var

ch：char；

begin

ch:= ‘0'；

case ch of

‘1':Writeln(‘Monday');

‘2':Writeln(‘Tuesday');

‘3':Writeln(‘Wednesday');；

‘4':Writeln(‘Thursday');；

‘5':Writeln(‘Friday');

‘6':Writeln(‘Saturday');

‘0':Writeln(‘Sunday');

end；

end.

47、下列程序段的输出结果为（5,1 ）。

Var

A,B,C:Integer;

Begin

A:=1;

B:=5;

C:=A;

A:=B;

B:=C;

Write(A,B);

End.

50、下列程序段的输出结果为（ 6 7 8 9 10 ）。

Var

I,X:Integer;

Begin

X:=10;

For I:=6 to x do

Write(I)；

End.

51、下列程序段的输出结果为（ 3,2,1 ）。验证

Var

N,A,B,C:Integer;

Begin

N:=123;

A:=N Mod 10;

B:=N Div 10 Mod 10;

C:=N Div 100;

Writeln(A,B,C);

End.

55、下列程序输出结果为（ N ）。验证

Var

Year:Integer;

Begin

Year:=2000;

If (Year Mod 400=0) Or ((Year Mod 4=0) And (Year Mod 1000)) Then

Writeln(‘Y')

Else

Writeln(‘N');

End.

56、下列程序输出结果为（ 2，3，2 ）。

Var

A,B,C:Integer;

Begin

A:=1;

B:=2;

C:=3;

A:=B;

B:=C;

C:=A;

Writeln(A,B,C);

End.

60、下列程序输出结果为（ 15 ）。

Var

I,S:Integer;

Begin

S:=0;

For I:= 1 to 5 Do

S:=S+I;

Writeln(S);

End.

61、下列程序输出结果为（ NO ）。

Var

Score:Integer;

Begin

Score:=51;

If (Score=60) Then

Writeln(‘PASS')

Else

Writeln(‘NO');

End.

三、Pascal常用函数

sqr(x)=x2 例：sqr(3)=9

sqrt(x)=/-x2求平方根函数 例：sqrt(16)=4

round()四舍五入函数 例：round(3.14)=3 round(-4.2)=-4 round(-5.5)=-6

mod()求余函数，余数符号与被除数同

div()整除函数，结果为商

odd()判断一个整是是否是奇数，是奇数为真实即ture。odd(3)=ture odd(4)=false 注：ture代表1，false代表0

trunc()截尾函数，即把小数点后面的舍去。 trunc(5.3)=5 trunc(5.9)=5

random()随机函数

abs()取绝对值。abs(0)=0， abs(5)=5， abs(-3)=3

pred()前导函数 结果的值比()小1。pred(-3)=-4 pred(b)=a

succ()后续函数，与上反。结果的值比()大1。pred(-3)=-2 pred(b)=c

ord()序号函数 ord(false)=0 ord(true)=1 ord(-5)=-5 ord('A')=65 ord('a')=97(97为a的ASCII码)

chr()字符函数，ASCII码对应的字符。 chr(65)='A' chr(97)='a'

高一年级信息技术考试

1题 钟义信

2题 共享性

3题 数字化

4题 查询

5题 .xls

6题 有组织的，可共享的

7题 人不属于信息来源

8题 Photoshop、CorelDraw、Illustrator、PageMaker

9题 提高自身的信息素养

10题 通过它可以找到与某一内容相关的所有网站信息