第十四届全国青少年信息学奥林匹克联赛初赛试题及答案(提高组PASCAL)
NOIP2014提高组Pascal初赛试题
第二十届全国青少年信息学奥林匹克联赛初赛提高组Pascal语言试题竞赛时间：2014年10月12日14:30~16:30选手注意：●试题纸共有10页，答题纸共有2页，满分100分。
请在答题纸上作答，写在试题纸上的一律无效。
●不得使用任何电子设备（如计算器、手机、电子词典等）或查阅任何书籍资料。
一、单项选择题（共15题，每题1.5分，共计22.5分；每题有且仅有一个正确选项）1.以下哪个是面向对象的高级语言（）。
A. 汇编语言B. C++C. FortranD. Basic2.1TB代表的字节数量是（）。
A. 2的10次方B. 2的20次方C. 2的30次方D. 2的40次方3.二进制数00100100和00010101的和是（）。
A. 00101000B. 001010100C. 01000101D. 001110014.TCP协议属于哪一层协议（）。
A. 应用层B. 传输层C. 网络层D. 数据链路层5.下列几个32位IP地址中，书写错误的是（）。
A. 162.105.136.27B. 192.168.0.1C. 256.256.129.1D. 10.0.0.16.在无向图中，所有顶点的度数之和是边数的（）倍。
A. 0.5B. 1C. 2D. 47.对长度为n的有序单链表，若检索每个元素的概率相等，则顺序检索到表中任一元素的平均检索长度为（）。
A. n/2B. (n+1)/2C. (n-1)/2D. n/48.编译器的主要功能是（）。
A. 将一种高级语言翻译成另一种高级语言B. 将源程序翻译成指令C. 将低级语言翻译成高级语言D. 将源程序重新组合9.二进制数111.101所对应的十进制数是（）。
A. 5.625B. 5.5C. 6.125D. 7.62510.若有变量var a: integer; x, y: real;，且a := 7，x := 2.5，y := 4.7，则表达式x + a mod 3 * trunc(x + y) mod 2 div 4的值大约是（）。
初中生信息学奥林匹克竞赛初赛模拟试题(PASCAL语言)附参考答案
信息学竞赛初赛模拟试题(十一)(初中组PASCAL语言，两小时完成)♦♦请将正确答案在答卷上填写，在本试题卷上答题无效♦♦一、选择题(每题只有一个选项符合题目要求，多选无效，1.5*20=30分)1、当一个应用程序窗口被最小化后，该应用程序将()。
A)被终止执行B)继续在前台执行C)被暂停执行D)被转入后台执行2、在"替换"对话框中指定了查找内容但没有在"替换为"框中输入内容，则执行"全部替换"后，将()。
A)只进行查找，不进行替换B)不能执行，提示输入替换的内容C)每找到一个欲查内容，就提示用户输入替换的内容D)把所有找到的内容删除3、计算机网络最主要的功能在于()。
A)扩充存储容量B)提高计算速度C)传输文件D)共享资源4、在计算机领域中，通常用英文单词"BYTE〃来表示()A)字B)字长C)二进制位D)字节5、发现计算机病毒后，一种较为彻底的清除方法是()。
A)删除磁盘文件B)格式化磁盘C)用查毒软件处理D)用杀毒软件处理6、对于一个具有n个结点和e条边的无向图，若采用邻接表表示，则顶点表的大小为()，A)nB)n+1C)n-1D)n+e7、互联网址中公司的顶级域名一般是()。
A)NETB)GOVC)EDUD)COM8、在微机中，硬盘连同其驱动器属于()。
A)外(铺助)存储器B)输入设备C)输出设备D)主(内)存储器9、在全角状态下，输入的字母在屏幕上占有()个ASCII码字符的位置。
A)1个B)2个C)3个D)4个10、二进制数10011010和00101011进行逻辑乘运算(即"与"运算)的结果是()。
A)00001010B)10111011C)11000101D)1111111111、已知一棵二叉树的前序序列和中序序列分别为：ABDEGCFH和DBGEACHF，层次序列为()。
A)GEDHFBCAB)DGEBHFCAC)ABCDEFGHD)ACBFEDHG12、下列字符中，其ASCII码值最大的是()A)9B)DD)aD)y13、某顺序存储的表格，其中有90000个元素，已按关键项的值的上升顺序排列。
NOIP2020提高组初赛(C语言)试题及答案
NOIP2020提高组初赛（C语言）试题及答案NOIP2020提高组初赛（C语言）试题及答案第十四届(NOIP2020)信息学奥赛联赛提高组C语言初赛试题●● 全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效●● 一、单项选择题（共10题，每题1.5分，共计15分。
每题有且仅有一个正确答案）。
1. 在以下各项中，（C ）不是操作系统软件。
A. SolarisB. LinuxC. SybaseD. Windows Vista E. Symbian 2．微型计算机中，控制器的基本功能是（A ）。
A. 控制机器各个部件协调B. 实现算术运算和逻辑运算C. 存储各种控制信息D.获取外部信息E. 存放程序和数据 3. 设字符串S=”Olympic”，S的非空子串的数目是（B）。
A. 29B. 28C. 16D. 17E. 7 4．完全二叉树共有2*N-1个结点，则它的叶节点数是（C ）。
A. N-1B. 2*NC. ND. 2N-1E. N/2 5．将数组{8, 23, 4, 16, 77, -5, 53, 100}中的元素按从大到小的顺序排列，每次可以交换任意两个元素，最少需要交换（B ）次。
A. 4B. 5C. 6D. 7E. 8 6．设栈S的初始状态为空，元素a，b，c，d，e，f依次入栈S，出栈的序列为b，d，c，f，e，a，则栈S的容量至少应该是（D ）。
A. 6B. 5C. 4D. 3E. 2 7. 与十进制数28.5625相等的四进制数是（）。
A. 123.21B. 131.22C. 130.22D. 130.21E. 130.20 8．递归过程或函数调用时，处理参数和返回地址，通常使用一种称为（E）的数据结构。
A. 队列B. 多维数组C. 线性表D. 链表E. 栈9. TCP/IP是一组构成互联网基础的网络协议，字面上包括两组协议：传输控制协议（TCP）和网际协议（IP）。
TCP/IP 协议把Internet网络系统描述成具有四个层次功能的网络模型,其中提供源节点和目的节点之间的信息传输服务，包括寻址和路由器选择等功能的是（B）。
中学生信息学奥林匹克竞赛初赛命题试题附参考答案
信息学命题（十）A 、二进制码B 、八进制码C 、十进制码D 、智能拼音码2、计算机的软件系统通常分为（A 、硬件系统和软件系统 C 、系统软件和应用软件3、关于软盘读写孔，正确的说法是（ ）。
A .从该孔读信息C.当该孔处于开状态时，不能删除盘中文件。
D .该孔没有作用4、一棵二叉树的中序遍历序列为 DGBAECHF 后序遍历序列为 GDBEHFCA 则前序遍历的序列是（）b5E2RGbCAPA 、ABCDFGHEB 、ABDGCEFHC 、ACBGDHEFD 、ACEFHBGD lEanqFDPw5、下列叙述中错误的是（）。
A.微型计算机应避免置于强磁场之中B •微型计算机使用时间不宜过长，而应隔几个小时关机一次C.微型计算机应避免频繁关开，以延长其使用寿命D.计算机应经常使用，不宜长期闲置不用6、 计算机网络最主要的优点是（ ）。
A 、运算速度快B 、共享资源C 、精度高D 、存储容量大7、 下列4个不同进制表示的数中，最大的一个数是（ ）A 、（220.1）10B 、（11011011.1）2C 、（334.1）8 &为了区分汉字与 ASCII 码，计算机中汉字编码的最高位为（ ）A 、1B 、0C 、-1D 、2 9、下列正确的文件名是（）。
A. comma nd 。
ComB. comma nd_comC. comma nd,comD. comma RTCrpUDGiT10、 .一般来说，TCP/IP 的IP 提供的服务是（ A.运输层服务B.会话层服务 C 表示层服务11、 通信时，模拟信号也可以用数字信道来传输， 5PCzVD7HxAA 、D/AB 、A/DC ModemD 、 Codec12、一个栈的输入顺序为 1、 2、 3、4、5,卜列序列中可能是栈的输出序列是（）A 、 54312B 、 24135C 、 21543D 、 1253413、属于In ternet 的功能是（）A 、聊天B 、远程教育C 、查询资料D 、传送能量14、下列描述计算机病毒的特性中，（）是正确的。
最新NOIP提高组初赛试题-C++含答案资料
第十四届全国青少年信息学奥林匹克联赛初赛试题（提高组 C++ 语言二小时完成）●●全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效●●一、单项选择题（共10题，每题1.5分，共计15分。
每题有且仅有一个正确答案）。
1. 在以下各项中，（）不是操作系统软件。
A. SolarisB. LinuxC. SybaseD. Windows VistaE. Symbian2．微型计算机中，控制器的基本功能是（）。
A. 控制机器各个部件协调工作B. 实现算术运算和逻辑运算C.存储各种控制信息D. 获取外部信息E. 存放程序和数据3. 设字符串S=”Olympic”，S的非空子串的数目是（）。
A. 29B. 28C. 16D. 17E. 74．完全二叉树共有2*N-1个结点，则它的叶节点数是（）。
A. N-1B. 2*NC. ND. 2N-1E. N/25．将数组{8, 23, 4, 16, 77, -5, 53, 100}中的元素按从大到小的顺序排列，每次可以交换任意两个元素，最少需要交换（）次。
A. 4B. 5C. 6D. 7E. 86．设栈S的初始状态为空，元素a，b，c，d，e，f依次入栈S，出栈的序列为b，d，c，f，e，a，则栈S的容量至少应该是（）。
A. 6B. 5C. 4D. 3E. 27. 与十进制数28.5625相等的四进制数是（）。
A. 123.21B. 131.22C. 130.22D. 130.21E. 130.208．递归过程或函数调用时，处理参数和返回地址，通常使用一种称为（）的数据结构。
A. 队列B. 多维数组C. 线性表D. 链表E. 栈9. TCP/IP是一组构成互联网基础的网络协议，字面上包括两组协议：传输控制协议（TCP）和网际协议（IP）。
TCP/IP 协议把Internet网络系统描述成具有四个层次功能的网络模型,其中提供源节点和目的节点之间的信息传输服务，包括寻址和路由器选择等功能的是（）。
1999年—2012年信息学奥赛提高组初赛试题PASCAL(附答案_完整)
CCF NOIP2011 初赛 4 普及组 Pascal
有
个不同的独立集。
三、阅读程序写结果。（共 4 题，每题 8 分，共计 32 分） 1． var n,i,temp,sum:integer; a :array[1..100] of integer; begin readln(n); for i:=1 to n do read(a[i]); for i:=1 to n-1 do if a[i]>a[i+1] then begin temp := a[i]; a[i] := a[i+1]; a[i+1] := temp; end; for i:=n downto 2 do if a[i]<a[i-1] then begin temp := a[i]; a[i] := a[i-1]; a[i-1] := temp; end; sum := 0; for i:=2 to n-1 do inc(sum,a[i]); writeln(sum div (n-2)); end.
CCF NOIP2011 初赛 7 普及组 Pascal
if left[x] > 0 then calc(left[x],dep+l); if right[x]> 0 then calc(right[x),dep+l); end; procedure dfs(x,th :integer); begin if th = n+1 then begin s3 :=''; check(1); if s2=s3 then begin ans := 0; calc(1,1); writeln(ans); end; exit; end; if (left[x]=0) and (right[x]=0) then begin left[x) := th; father[th] := x; dfs(th, th+1); father[th] := 0; left[x] := 0; end; if right[x] = 0 then begin right[x] := th; father[th] := X; dfs(th, th+1); father[th] := 0; right[x] := 0; end; if (father[x] > 0) then dfs(father[x],th); end;
NOIP2021年提高组(Pascal语言)初赛试题及答案
NOIP2021年提高组（Pascal语言）初赛试题及答案一、单项选择题题目:CPU（A.d）的以下组件不在主板中e.算术逻辑单元(alu)2.在关系数据库中，存储在数据库中的数据的逻辑结构主要是（E）。
A.二叉树B.多叉树C.哈希表D.C+树E.二维表3.在下列各项中,只有(d)不是计算机的存储容量常用单位a.byteb.kbc.mbd.ube.tb4.ASCII码是指（b）A.二进制十进制转换码b.美国信息交换标准码C.二进制数字码d.计算机可处理字符的唯一编码e.常用字符的二进制编码5.在Pascal语言中，表达式（23or2xor5）的值是（a）a.18b 1c。
23d。
32e。
246.在pascal语言中,判断整数a等于0或b等于0或c等于0的正确的条件表达式是(b)a、不（（a<>0）或（b<>0）或（c<>0））b.不（（a<>0）和（b<>0）和（c<>0））c.不（（a=0）和（b=0）和（c=0））d.(a=0)and(b=0)and(c=0)e、不是（（a=0）或（b=0）或（c=0））7.地面上有标号为a、b、c的3根细柱,在a柱上方有10个直径相同中间有孔的圆盘,从上到下次编号为1,2,3,??，将a柱上的部分盘子经过b柱移入c柱,也可以在b柱上暂存。
如果b柱上的操作记录为：“进，进，出，进，进，出，出，进，进，出，进，出，出”。
那么,在c柱上,从下到上的盘子的编号为(d).a.243657b.241257c.243176d.243675e.2143758.十进制数17.5625对应的八进制数是（b）a.21.5625b 21.44c。
21.73d。
二十一点七三一e.前4个答案都不对9.?? 在下面的描述中，不一定是Euler's is:Da图G中没有奇数度的顶点b.包括欧拉环游的图(欧拉环游是指通过图中每边恰好一次的闭路径)c.包括欧拉闭迹的图(欧拉迹是指通过途中每边恰好一次的路径)d.存在一条回路,通过每个顶点恰好一次10.??, 关于死循环，只有（a）是正确的a.不存在一种算法,对任何一个程序及相应输入数据,都可以判断是否会出现死循环,因而,任何编译系统都不作死循环检查.b.有些编译系统可以检测出死循环.c、死循环是一个语法错误。
1999年—2012年信息学奥赛提高组初赛试题PASCAL(附答案_完整)
C．关于逻辑与的分配律： a (b c ) (a b ) (a c ) D．关于逻辑或的分配律： a (b c ) (a b ) (a c ) 8．十进制下的无限循环小数（不包括循环节内的数字均为 0 成均为 9 的平凡情况） ，在二进 制下有可能是（ ） 。 A．无限循环小数(不包括循环节内的数字均为 0 或均为 9 的平凡情） B．无限不循环小数 C．有限小数 D．整数 9． （ ）是目前互联网上常用的 E-mail 服务协议。 A．HTTP B．FTP C．POP3 D．SMTP 10．以下关于计算复杂度的说法中，正确的有（ ） 。 A．如果一个问题不存在多项式时间的算法，那它一定是 NP 类问题 B．如果一个问题不存在多项式时间的算法，那它一定不是 P 类问题 C．如果一个问题不存在多项式空间的算法，那它一定是 NP 类问题 D．如果一个问题不存在多项式空间的算法，那它一定不是 P 类问题 三、问题求解（共 2 题，每题 5 分，共计 10 分） 1． 本题中，我们约定布尔表达式只能包含 p，q，r 三个布尔变量，以及“与” （∧） 、 “或” （∨） 、 “非” （￢）三种布尔运算。如果无论 p，q，r 如何取值，两个布尔表达式的值总是相 同，则称它们等价。例如(p∨q)∨r 和 p∨(q∨r)等价，p∨￢p 和 q∨￢q 也等价；而 p∨q 和 p ∧q 不等价。那么两两不等价的布尔表达式最多有 个。 2． 对于一棵二叉树，独立集是指两两互不相邻的节点构成的集合。例如，图 1 有 5 个不同 的独立集（1 个双点集合，3 个单点集合、1 个空集） ，图 2 有 14 个不同的独立集。那么图 3
CCF NOIP2011 初赛 6 普及组 Pascal
begin readln(n); h := 1; data[h] := 1; ans := 0; for i:=2 to n do begin inc(h); data[h] := 1; while (h>1) and (data[h]=data[h-1]) do merge; end; writeln(ans); end. （1） 输入：8 输出：______________ （4 分） （2） 输入：2012 输出：______________ （4 分） 4． var left, right, father :array[1..20] of integer; sl, s2, s3 :string; n,ana :integer; procedure check(x:integer); begin if left[x]>0 then check(left[x)); s3 := s3 + sl[x]; if right[x]>0 then check(right[x]); end; procedure calc(x,dep :integer); begin ans:= ans + dep*(ord(sl[x])-ord('A')+1);
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第十四届全国青少年信息学奥林匹克联赛初赛试题（提高组Pascal语言二小时完成）●●全部试题答案均要求写在答卷纸上，写在试卷纸上一律无效●●一、单项选择题（共10题，每题1.5分，共计15分。
每题有且仅有一个正确答案）。
1．在以下各项中，（）不是操作系统软件。
A．Solaris B．Linux C．Sybase D．Windows Vista E．Symbian2．微型计算机中，控制器的基本功能是（）。
A．控制机器的各个部件协调工作 B．实现算数运算与逻辑运算 C．存储各种控制信息D．获取外部信息E．存放程序和数据3．设字符串S=“Olympic”，S的非空字串的数目是（）。
A．29 B．28 C．16 D．17 E．74．完全二叉树有2*N-1的结点，则它的叶子结点数目是（）。
A．N-1 B．2*N C．N D．2N-1 E．N/25．将数组{8，23，4，16，77，-5，53，100}中元素从大到小按顺序排序，每次可以交换任意两个元素，最少要交换（）次。
A．4 B．5 C．6 D．7 E．86．设栈S的初始状态为空，元素a，b，c，d，e，f依次入栈，出栈顺序为b，d，c，f，e，a那么栈容量至少应该是（）。
A．6 B．5 C．4 D．3 E．27．与十进制数28.5625相等的四进制数是（）A．123.21 B．131.22 C．130.22 D．130.21 E．130.208．递归过程和函数调用时，处理参数和返回地址，通常使用一种称为（）的数据结构。
A．队列B．多维数组C．线性表D．链表E．栈9．TCP/IP 是一组构成互联网基础的网络协议，字面上包括两组协议：传输控制协议（TCP）和网际互联协议（IP）。
TCP/IP协议把Internet网络系统描述成具有4个层次功能的网络模型，其中提供源节点和目的节点之间的信息传输服务，包括寻址和路由器选择等功能的是（）。
A．链路层B．网络层C．传输层D．应用层E．会话层10．对有序数组{5,13,19,21,37,56,64,75,88,92,100}进行二分查找，等概率情况下，查找成功的平均查找长度（平均比较次数）是（）。
A．35/11 B．34/11 C．33/11 D．32/11 E．34/10 二、不定项选择题（共10题，每题1.5分，共计15分。
每题正确答案的个数大于或等于1。
多选或少选均不得分）。
11．下列关于图灵的说法正确的有（）。
A．图灵奖是美国计算机协会与1966年设立的，专门鼓励那些对计算机做出重要贡献的个人B．图灵奖有“计算机界诺贝尔奖”之称。
C．迄今为止，还没有华裔计算机科学家获此殊荣。
D．图灵奖的名称取自计算机科学先驱、英国科学家阿兰·图灵。
12．计算机在工作过程中，若突然停电，（）中不会丢失信息不会丢失。
A．硬盘B．CPU C．ROM D．RAM13．若A=True，B=False，C=True，D=False，以下逻辑运算表达式真的有（）。
A．（A∧B）V（C∧DV¬A）B．（（¬A∧B）VC）∧¬B C．（BVCVD）VD∧A D．A∧（DV¬C）∧B14．Web2.0是近年来互联网热门概念之一，其核心是互动与分享。
下列网站中，（）是典型的Web2.0的应用。
A．Sina B．Flickr C．Yahoo D．Google15．(2008)10+ (5B)16的结果是（）。
A．（833）16 B．（2099）10C．（4063）8D．（100001100011）216．二叉树T，已知其先序遍历是1 2 4 3 5 7 6（数字为节点编号，以下同），后序遍历是4 2 7 5 6 3 1，则该二叉树的中根遍历是（）A．4 2 1 7 5 3 6 B．2 4 1 7 5 3 6 C．4 2 1 7 5 6 4 D．2 4 1 5 7 3 617．面向对象的程序设计（Object-Oriented Programming）是一种程序设计的方法论，它将对象作为程序设计的基本单元，将数据和程序封装在对象中，以提高软件的重用性、灵活性、和扩展性。
下面关于面向对象的程序设计说法中正确的是（）。
A．面向对象的程序设计方法通常采用自顶向下的设计方法进行设计。
B．面向对象的程序设计方法具有继承性（inheritance）、封装性（encapsulation）、多态性（polymorphism）等几大特点。
C．支持面向对象特性称为面向对象的编程语言，目前较为流行的有C++，JA V A，C#等。
D．面向对象的程序设计的雏形来自于Simula语言，后来在SmallTalk语言的完善和标准化的过程中得到更多的扩展和对以前的思想的重新注解。
至今，SmallTalk语言仍然被视为面向对象的基础。
18．设T是一棵有n个定点的树，以下说法正确的是（）。
A．T是联通的，无环的B．T是联通的，有n-1条边C．T是无环的，有n-1条边D．以上都不对19．NOIP竞赛推荐使用的语言环境有（）。
A．Dev-C++ B．Visual C++ C．Free Pascal D．Lazarus20．在下列防火墙（Firewall）的说法中，正确的有（）。
A．防火墙是一项协助确保信息安全的设备，其会依照特定的规则，允许或是限制数据通过B．防火墙可能是一台专属硬件或是安装在一般硬件上的一套软件C．网络层防火墙可以视为一种IP数据包过滤器，只允许符合特定规定的数据包通过，其余的一概禁止穿越防火墙D．应用层防火墙是在TCP/IP的“应用层”上工作，可以拦截进出某应用程序的所有数据包三、问题求解（共2题，每题5分，共计10分）1．有6个城市，任何两个城市之间有一条道路连接，6个城市之间两两之间的距离如下表表示，则城市1到城市6的最短距离为____________。
2．书架上有21本书，编号从1 到21 从中选4 本，其中每两本的编号都不相邻的选法一共有___________________种。
四、阅读程序写结果（共4题，每题8分，共计32分）。
1．vari,a,b,c,d:integer;f:array[0..3] of integer;beginfor i:=0 to 3 doread(f[i]);a:=f[0]+f[1]+f[2]+f[3];a:=a div f[0];b:=f[0]+f[2]+f[3];c:=(b*f[1]+a) div f[2];d:=f[(b div c) mod 4];if (f[(a+b+c+d) mod 4]>f[2]) thenbegina:=a+b;writeln(a)endelsebeginc:=c+d;writeln(c);end;end.输入：9 19 29 39输出：_______________________________2．procedure foo(a,b,c:integer);beginif a>b then foo(c,a,b)elsewriteln(a,',',b,',',c)end;var a,b,c:integer;beginreadln(a,b,c);foo(a,b,c);end.输入：2 1 3输出：_________________3．procedure f(a,b,c:integer);beginwrite(a,b,c,'/');if (a=3)and(b=2)and(c=1) then exit;if (b<c) then f(a,c,b)elseif a<b thenif a<c then f(c,a,b) else f(b,c,a);end;var a,b,c:integer;beginreadln(a,b,c);f(a,b,c);end.输入：1 3 2输出：____________________4．vars:string;i,j,len,k:integer;beginreadln(s);len:=length(s);for i:=1 to len doif (ord(s[i])>=ord('A')) and (ord(s[i])<=ord('Z')) thens:=chr(ord(s[i])-ord('A')+ord('a'));for i:=1 to len doif (ord(s[i])<ord('X')) then s:=chr(ord(s[i])+3)elses:=chr(ord(s[i])-23);write(s);write('/');for j:=1 to 3 dobegini:=1;while i<=len-j dobegins[i]:=s[i+j];i:=i+j;end;end;writeln(s);end.输入：ABCDEFGuvwxyz输出：________________________________五．完善程序（前6空，每空3分，后5空，每空2分，共28分）。
1．（找第k大的数）给定一个长度为1000000的无序正整数序列，以及另一个数n(1<=n<=1000000)，接下来以类似快速排序的方法找到序列中第n大的数（关于第n大的数：例如序列{1，2，3，4，5，6}中第3大的数是4）Var a:array[1..1000000] of integer;n,m,ans:integer;procedure swap(var a,b:integer);var t:integer;beginif (a<>b) then begint:=a; a:=b; b:=t;end;end;Function FindKth(left,right,n:integer):integer;Var tmp,value,i,j:integer;beginif left=right then exit(left);tmp:=random(right-left)+left;swap(a[tmp],a[left]);value:=____①_____i:=left; j:=right;while i<j dobeginwhile (i<j) and (________②______) do dec(j);if i<j then begina:=a[j];inc(i);end else break;while (i<j) and (___③___) do inc(i);if i<j then begina[j]:=a[i]; dec(j);end else break;end;____④_____if i<n then begin inc(i); exit(FindKth(_____⑤_____));end;if i>n then begin dec(j); exit(______⑥________);end;exit(i);end;var i:integer;beginrandomize;ans:=-1;m:=5;for i:=1 to m doread(a[i]);read(n);ans:=FindKth(1,m,n);writeln(a[ans]);end.2．（矩阵中的数字）有一个n*n（1≤n≤5000)的矩阵a，对于1≤i<n, 1≤j≤n, a[i,j]<a[i+1,j] a[j,i]<a[j,i+1]。