NOIP第二十二届全国青少年信息学奥林匹克联赛提高组初赛pascalWord文件下载.docx

1、dec（k）;end;writeln（k, , n）;end. 程序运行后的输出结果是（ ）。 A. 2,2 B. 2,3 C. 3,2 D. 3,311. 有 7 个一模一样的苹果，放到 3 个一样的盘子中，一共有（ ）种放法。 A. 7 B. 8 C. 21 D. 3712. Lucia 和她的朋友以及朋友的朋友都在某社交网站上注册了账号。下图是他们之间的关系图，两个人之间有边相连代表这两个人是朋友，没有边相连代表不是朋友。这个社交网站的规则是：如果某人 A 向他（她）的朋友 B 分享了某张照片，那么 B 就可以对该照片进行评论；如果 B 评论了该照片，那么他（她）的所有朋友都可以看见这个

2、评论以及被评论的照片，但是不能对该照片进行评论（除非 A 也向他（她）分享了该照片）。现在 Lucia 已经上传了一张照片，但是她不想让 Jacob 看见这张照片，那么她可以向以下朋友（）分享该照片。A. Dana, Michael, Eve B. Dana, Eve, MonicaC. Michael, Eve, Jacob D. Micheal, Peter, Monica13. 周末小明和爸爸妈妈三个人一起想动手做三道菜。小明负责洗菜、爸爸负责切菜、妈妈负责炒菜。假设做每道菜的顺序都是：先洗菜 10 分钟，然后切菜 10 分钟，最后炒菜 10 分钟。那么做一道菜需要 30 分钟。注意：两

3、道不同的菜的相同步骤不可以同时进行。例如第一道菜和第二道的菜不能同时洗，也不能同时切。那么做完三道菜的最短时间需要（ ）分钟。 A. 90 B. 60 C. 50 D. 4014. 假设某算法的计算时间表示为递推关系式 则算法的时间复杂度为（）。 A. O（𝑛） B. O（） C. O（ log 𝑛） D. O（𝑛2）15. 给定含有 n 个不同的数的数组 L=。如果L中存在xi（1 i n）使得 x1 x2 . xi-1 xi+1 . xn， 则称 L 是单峰的，并称xi是L的“峰顶”。现在已知L是单峰的，请把 a-c 三行代码补全到算法中使得

4、算法正确找到L的峰顶。a. Search（k+1, n）b. Search（1, k-1）c. return LkSearch（1, n）1. kn/22. if Lk Lk-1 and Lk Lk+13. then _4. else if Lk Lk-1 and Lk 5. then _6. else _正确的填空顺序是（）。 A. c, a, b B. c, b, a C. a, b, c D. b, a, c二、不定项选择题（共 5 题，每题 1.5 分，共计 7.5 分；每题有一个或多个正确选项，多选或少选均不得分）1. 以下属于无线通信技术的有（ ）。A. 蓝牙 B. WiFi C.

5、 GPRS D. 以太网2. 可以将单个计算机接入到计算机网络中的网络接入通讯设备有（ ）。 A. 网卡 B. 光驱 C. 鼠标 D. 显卡3. 下列算法中运用分治思想的有（ ）。 A. 快速排序 B. 归并排序 C. 冒泡排序 D. 计数排序4. 下图表示一个果园灌溉系统，有 A、B、C、D 四个阀门，每个阀门可以打开或关上，所有管道粗细相同，以下设置阀门的方法中，可以让果树浇上水的有（ ）。 A. B 打开，其他都关上 C. A 打开，其他都关上 B. AB 都打开，CD 都关上 D. D 打开，其他都关上5. 参加 NOI 比赛，以下能带入考场的有（ ）。 A. 钢笔 B. 适量的衣服

6、C. U 盘 D. 铅笔三、问题求解（共 2 题，每题 5 分，共计 10 分；每题全部答对得 5 分，没有部分分）1. 一个 18 的方格图形（不可旋转）用黑、白两种颜色填涂每个方格。如果每个方格只能填涂一种颜色，且不允许两个黑格相邻，共有_种填涂方案。2. 某中学在安排期末考试时发现，有7个学生要参加7门课程的考试，下表列出了哪些学生参加哪些考试（用表示要参加相应的考试）。最少要安排_个不同的考试时间段才能避免冲突？考试学生 1学生 2学生 3学生 4学生 5学生 6学生 7通用技术物理化学生物历史地理政治四、阅读程序写结果（共 4 题，每题 8 分，共计 32 分）1. vara: ar

7、ray1.6 of longint = （1, 2, 3, 4, 5, 6）;pi, pj, t, i:pi := 1;pj := 6;while pi pj dot := api;api := apj;apj := t;inc（pi）;dec（pj）;for i := 1 to 6 dowrite（ai, ）;writeln;输出：_2. varn, i, j, k:total_len: array1.100 of longint;len: array1.100, 1.3 of longint;a, b: array1.100, 1.100 of char;c: array1.100 of

8、string100;i : j : k :readln（n）;= 1 to n doreadln（ci）;total_leni:=length（ci）;j :while （ci, j = leni, 2） thenwrite（NO,）else= 1 to leni, 2 doif ai, k = bi, j thenif k leni, 1 thenbreak;if j = leni, 2 thenYES,输入：3AB:ACDEbFBkBDAR:ACDBrTSARS:Severe Atypical Respiratory Syndrome（注：输入各行前后均无空格）3. function lp

9、s（seq: string; i, j: longint）:len1, len2:if i = j thenexit（1）;if i j thenexit（0）;if （seqi = seqj） thenexit（lps（seq, i + 1, j - 1） + 2）;len1 := lps（seq, i, j - 1）;len2 := lps（seq, i + 1, j）;if len1 len2 thenexit（len1）exit（len2）;n:seq:seq := acmerandacm;n := length（seq）;writeln（lps（seq, 1, n）;4. varma

10、p: array1.100, 1.100 of longint;sum, weight, visit:n, i, x, y, ans, ansn:procedure dfs（node: longint）;v, maxw:visitnode :sumnode :maxw :for v :if （mapnodev = 0） or （visitv maxw then= sumv;if n - sumnode = n - sumnode;weightnode := maxw;fillchar（map, sizeof（map）, 0）;fillchar（sum, sizeof（sum）, 0）;fill

11、char（weight, sizeof（weight）, 0）;fillchar（visit, sizeof（visit）, 0）;= 1 to n - 1 doread（x,y）;mapx,y:=1;mapy,x:dfs（1）;ans := n; ansn :if weighti ans then= weighti;ansn := i;writeln（ansn, , ans）;111 21 32 42 52 63 77 87 116 99 10五、完善程序（共 2 题，每题 14 分，共计 28 分）1. （交朋友）根据社会学研究表明，人们都喜欢找和自己身高相近的人做朋友。现在有n名身高两两

12、不相同的同学依次走入教室，调查人员想预测每个人在走入教室的瞬间最想和已经进入教室的哪个人做朋友。当有两名同学和这名同学的身高差一样时，这名同学会更想和高的那个人做朋友。比如一名身高为1.80米的同学进入教室时，有一名身高为1.79米的同学和一名身高为1.81米的同学在教室里，那么这名身高为1.80米的同学会更想和身高为1.81 米的同学做朋友。对于第一个走入教室的同学我们不做预测。由于我们知道所有人的身高和走进教室的次序，所以我们可以采用离线的做法来解决这样的问题，我们用排序加链表的方式帮助每一个人找到在他之前进入教室的并且和他身高最相近的人。（第一空 2 分，其余 3 分）constmaxn

13、 = 200000;infinity = 2147483647;answer, height, previous, next: array0.maxn of longint;rank:n, higher, shorter, i:procedure sort（l, r:x, i, j, temp:x := heightrank（l + r） div 2; i := l;= r;while i = j dowhile heightranki x do dec（j）;if （1） then begintemp := ranki; ranki := rankj; rankj := temp;inc（i

14、）; dec（j）;if i r then sort（i, r）;if l j then sort（l, j）;read（heighti）;ranki :sort（1, n）;previousranki := ranki - 1; （2） ;= n downto 2 dohigher := infinity; shorter :if previousi shorter := heighti - heightpreviousi;if nexti 1）个城市因地震而导致交通中断时，首都到多少个城市的最短路径长度会发生改变。如果因为无法通过第 i 个城市而导致从首都出发无法到达某个城市，也认为到达该

15、城市的最短路径长度改变。对于每一个城市 i，假定只有第 i 个城市与外界交通中断，输出有多少个城市会因此导致到首都的最短路径长度改变。我们采用邻接表的方式存储图的信息，其中 headx表示顶点 x 的第一条边的编号，nexti表示第 i 条边的下一条边的编号，pointi表示第 i 条边的终点，weighti表示第 i 条边的长度。maxn = 6000;maxm = 100000;inf = 2147483647;next, point, weight: array1.maxm of longint;head, dist, visit: array1.maxn of longint;queu

16、e: array0.maxn - 1 of longint;n, m, i, j, s, t, total, x, y, z, answer:procedure link（x, y, z:inc（total）;nexttotal := headx;headx := total;pointtotal := y;weighttotal := z;= heady;heady := x;total :readln（n, m）;= 1 to m doreadln（x, y, z）;link（x, y, z）;= 1 to n do disti := inf; （1） ;queue1 :visit1 :s

17、 : t :/ 使用 SPFA 求出第一个点到其余各点的最短路长度while s = t do= queues mod maxn;while j 0 do if （2） thendistpointj := distx + weightj;if （visitpointj = 0） theninc（t）;queuet mod maxn := pointj;visitpointj := nextj; （3） ;inc（s）;= t do / 判断最短路长度是否不变= queues; if （pointj i） and （ （4） ）and （visitpointj = 0） then （5） ; inc（t）;queuet :answer :inc（answer, 1 - visitj）;, answer - 1）;提高组参考答案一、单项选择题（共 15 题，每题 1.5 分，共计 22.5 分）1245678DAB91012131415C每题有一个或多个正确选项，没有部分分）ABCABABD 1. 552. 31. 6,5,4,3,2,1,2. YES,NO,YES,3. 54. 2 5五、完善程序（共计 28 分，以下各程序填空可能还有一些等价的写法，由各省赛区组织本省专家审定及上机验证，可以不上报 CCF NOI 科学委员会复核）Pascal 语言C+语言C 语言分值i=j