不是VIP会员,不能显示答案,请在后台“我的信息” 在线升级 VIP

一、选择一个正确答案(每题 2 分,每题只有一个正确答案,多选无分。共 20 分)

1. 乐乐从网上下载了一个文件,其文件名是“蜗牛和黄鹂 .wav” ,那么她需要将文件存放到下图哪个文件夹中,该文件可以用什么软件打开? ( )

  • A.图片素材 PhotoShop
  • B.视频素材 会声会影
  • C.文字素材 Word
  • D.音乐素材 酷我

2. 黑客通常是利用种植在电脑上的木马程序获取你使用的账号和密码等信息。 乐乐在使用电脑过程中以下行为存在风险的是 ( )

  • A.定时为操作系统升级打补丁程序
  • B.在网络上下载的文件先杀毒后再打开
  • C.在没有打开防火墙软件情况下随意浏览网页
  • D.对 QQ 上传米的软件先杀毒再打开

3. 字符“ T”的 ASCII码对应的二进制数为 1010100,则大写字符“ P”的 ASCII码对应的二进制是 ( )

  • A. 1011001
  • B.1010000
  • C.1011101
  • D.1000111

4. 某计算机的部分参数如下表所示,其中不能体现“运行速度快”特征的参数是( ) ① 硬盘容量 800G ② 网卡 千兆网卡 ③ 显示器分辨率 1280×1024 ④ 处理器 Inter(r) Core? i5-2450M 2.50GHz

  • A.①②
  • B.③④
  • C.①③④
  • D.①②③

5. 有10个数据100、 200、 28、 70、 80、 12、 10、 15、6、50 依次存放在数组 d[1..10]中,使用如下程序段找出最大值:当方框内的语句刚好执行完 6次后(此时循环变量 i 的值为 4) ,变量 max的值是( ) max=d[10]; for i:=9 downto 1 do if d[i]> maX then max:=d[i]

  • A. 200
  • B.80
  • C.100
  • D.70

6. 乐乐最近创作了一部小说,现在她想给小说的主人公更换一个名字,在 Word 中最方便最高效实现的操作是 ( )

  • A.批注
  • B.修订
  • C.替换
  • D.自动更正

7. 若用 0和 1 表示波形电平的两种状态,则与 10110101相符的波形是 ( )

  • A.A
  • B.B
  • C.C
  • D.D

8. 下图是乐乐住手机上的操作, 该操作主要应用了人工智能中的 ( )

  • A.语音识别
  • B.虚拟现实
  • C.智能翻译
  • D.人机博弈

9. 以下哪个出栈序列不能由入栈序列 (1,2,3,4,5)得到 ( )

  • A.(1,2,3,4,5)
  • B.(5,4,3,2,1)
  • C.(2,4,1,3,5)
  • D.(2,5,4,3,1)

10. 下面哪个是即时通讯工具 ( )

  • A.微信
  • B.推特 Twitter
  • C.微博
  • D.脸谱 facebook

二、根据要求回答问题: (5+5=10分)

1. 神奇及无法理解的事总令人印象深刻,而魔术表演能让人们感受到忘却现实的愉快,这正是它最吸引人的地方。乐乐自从在春节联欢晚会上观看了魔术表演后,豪不犹豫的喜欢上了它,经过一段时间的研究后,她决定向好朋友笑笑展示一下学习成果。她先请笑笑在纸上写下一个三位数 abc,接着将这个三位数各个数位上数字全部排列, 依次为 acb,bac,bca,cab,cba这五个数,然后请笑笑把这个五个数的和告诉她,乐乐马上就能猜出笑笑在纸上写的三位数是什么?太震撼了,经过几次游戏后,小屁孩笑笑对乐乐佩服得五体投地。现在,笑笑告诉你这个五个数的和是 1133,聪明的你能猜出笑笑在纸上写下的这个三位数是什么吗?( )
答案:421

2. 早晨的时间真是太宝贵了,乐乐希望走最少的路从家赶往学校。如图所示,假设乐乐的家在 A处,学校在 G处,每条边表示马路,边上的数字表示该条马路的长度,则乐乐沿着马路从家到学校的最短距离是 ( )。
答案:11

三、阅读程序并写出运行结果( 8+8+8+8+8=40分)

1.

Program test1; 
var  a,b,c,ans:integer; 
begin 
  readln(a,b);
  c:=a+b;
  a:=c-a;
  ans:=a*b;
  writeln('Ans=',ans); 
end. 
输入: 5  8
输出:Ans=64

2. program test2; Var a,b:longint; begin readln (a, b) ; if (a > b) then a := (a + b) div (a - b) else a := (a - b) mod 3; writeln (a) ; end. 输入 1: 24 12 输入 2: 7 12
输出:3|-2

3.

program test3; 
var n: integer; 
function  fun (n:integer):integer; 
begin
  if n=1 then exit(1)
  else if n=2 then  exit(2)
  else if n=3 then  exit(3)
  else  exit(fun(n-3)*fun(n-1));
end; 
begin
  readln(n);  
  writeln(fun(n));
end. 
输入:7
输出:54

4.

program test4; 
const max=20; 
var a,b:array[1..max] of integer; 
   n:string;  len,i,j,s:integer; 
begin
  readln(n);
  len:=length(n);
  i:=len;  j:=1;
  while i>0 do
  begin
    a[j]:=ord(n[i])-ord ('0') ;
	inc (j) ;  dec (i) ;
  end;
  s:=0;
  for i:=1 to len do
    if a[i]>=5 then inc(s) ;
  writeln (s) ; 
end. 
输入:  387543284570123
输出:6

5.

program test5; 
Var  i, j, n, n1:longint ; 
begin
  readln (n) ;
  i:=2;  j:=0;  n1:=n;
  while n1<>1 do  begin
    while n1 mod i=0 do  begin
	  inc (j) ;
	  if j=1 then write(n, '=',i)
	    else  write ( '*' , i) ; 
	  n1:=n1 div i; 
	end;
	inc(i);
  end; 
end. 
输入:102 
输出:102=2*3*17

四、 完善程序(根据问题要求和已有程序,在程序空格出填入适当的语句或符号, 使程序完整。本题每空 2.5分,共 30 分)

1. 石头剪子布
又称”猜丁壳”。是一种流传多年的猜拳游戏。起源传到日本、 朝鲜等地, 随着亚欧贸易的不断发展, 它传到了欧洲, 到了近现代逐渐风靡世界。
游戏规则:两个玩家先各自握紧拳头, 然后其中一人或者两人一起共同念出口令, 在说最后一个音节的同时, 两个玩家出示自己心中想好的手势(“石头” 、 “剪子”或“布”) 。
石头:握紧的拳头。
剪子:或称“剪刀”,中指和食指伸直,其余手指握紧。
布:五指伸直,张开手掌。手心向下,或向上,或竖直(拇指向上) 。
每一个手势代表一个“武器” ,互相克制的原则是:剪子剪不动石头(石头胜利) ;布被剪子剪开(剪子胜利) ;石头被布包裹(布胜利) 。如果双方出示了一样的手势,就是平局。
从表面上看,每次出拳的输赢是随机性的, 但是这不意味着石头剪子布就是一个无聊的游戏。其实,整个游戏过程中充满了 “心理博弈” ,单次的输赢可能更多取决于运气,但是多次比赛的话,赢家一定是个心理博弈的高手。
笑笑和乐乐决定玩这个游戏, 以证明谁是心理高手。

下面的程序是模拟两人 PK的情况,记剪子为 0,石头为 1,布为 2,共进行 n (n<=100)局。对于每一局,输入笑笑和乐乐各自的出法(输入两个整数 a、b) ,判断并累加每人的分数,胜者记 2 分,输者不记分,平局每人各记 1 分, 最后一行输出获胜方,‘XiaoXiao win’或‘LeLe win’或‘The same’ 。

program test6:
var  n,i,a,b,  numa, numb: integer: 
begin
  readln (n);
  for  i:=1 to n do  begin
    readln(a,b);
	if  a=b  then  begin
	  inc(numa)  ;
	 inc(numb);
	end
  else 
   case a of
  0: case b of
    1:numb:=numb+2;
    2:numa:=numa+2;
  end;
  1: case b of
   0:numa:=numa+2;
   2:numb:=numb+2;
  end;
  2:case b of
    0:numb:=numb+2;
    1:numa:=numa+2;
  end; 
  end; 
end;
if numa=numb then
  writeln('The same')
else if numa>numb  then
  writeln('XiaoXiao win')
else  writeln('LeLe win'); 
end.

2. 最大子段和
老师给乐乐布置了一份作业, 乐乐不知如何解决,找你帮忙解决。老师给一串很长的数列,要求从中找出连续的一段来使得总和最大。
输入:第一行包括一个整数 n,表示数列长度为 n (n<=100000) 。
第二行包括 n 个整数来描述这个数列,每个整数的绝对值不超过 1000。
输出:只有一个整数,为最大的连续段总和。
样例输入:
5
1 -2 3 1 -4
样例输出:
4
算法分析:设 b[i]为以第 i个位置的数结尾的连续的最大子段和,若 b[i-l]大于 0,显然 ,b[i]=b[i-l]+a[i]; 如果 b[i-1] 小于 0,则b[i]=a[i],这里应用了一个贪心思想。通过枚举从第 1 个到第 n 个数结尾的连续的最大子段和,就可以求出所有数中连续的最大子段和。

program test7; 
var  a:array [l..100000]  of longint; 
  n,i,t,ans:longint; 
begin
  readln (n); 
  for i:=1 to n do
   read(a[i]) ;
  t:=a[1];
   ans:=t ;
  for  i:=2 to n do
  begin
    if t<0 then t:=0
	  else  t:=t+a[i]  ;
	if t>ans then  ans:=t  ;
  end; 
end.