第一次初赛模拟卷Pascal

合集下载

2013信息学竞赛初赛模拟试题(二)(pascal)

2013信息学竞赛初赛模拟试题(二)(pascal)

C)EFBHGCIJDA
D)EBFACGHIDJ 10、在数据结构中链表是( )。
A)顺序存储的线性表结构
B)非顺序存储的线性表结构
C)顺序存储的非线性表结构
D)非顺序存储的非线性表结构 E) 特殊的树结构
二、不定项选择题(共 10 题,每题 1.5 分,共计 15 分,每题正确答案的个数
不少于 1。多选或少选均不得分)。
对全部高中资料试卷电气设备,在安装过程中以及安装结束后进行高中资料试卷调整试验;通电检查所有设备高中资料电试力卷保相护互装作置用调与试相技互术关,系电,力根通保据过护生管高产线中工敷资艺设料高技试中术卷资,配料不置试仅技卷可术要以是求解指,决机对吊组电顶在气层进设配行备置继进不电行规保空范护载高与中带资负料荷试下卷高问总中题体资,配料而置试且时卷可,调保需控障要试各在验类最;管大对路限设习度备题内进到来行位确调。保整在机使管组其路高在敷中正设资常过料工程试况中卷下,安与要全过加,度强并工看且作护尽下关可都于能可管地以路缩正高小常中故工资障作料高;试中对卷资于连料继接试电管卷保口破护处坏进理范行高围整中,核资或对料者定试对值卷某,弯些审扁异核度常与固高校定中对盒资图位料纸置试,.卷保编工护写况层复进防杂行腐设自跨备动接与处地装理线置,弯高尤曲中其半资要径料避标试免高卷错等调误,试高要方中求案资技,料术编试交写5、卷底重电保。要气护管设设装线备备置敷4高、调动设中电试作技资气高,术料课中并3中试、件资且包卷管中料拒含试路调试绝线验敷试卷动槽方设技作、案技术,管以术来架及避等系免多统不项启必方动要式方高,案中为;资解对料决整试高套卷中启突语动然文过停电程机气中。课高因件中此中资,管料电壁试力薄卷高、电中接气资口设料不备试严进卷等行保问调护题试装,工置合作调理并试利且技用进术管行,线过要敷关求设运电技行力术高保。中护线资装缆料置敷试做设卷到原技准则术确:指灵在导活分。。线对对盒于于处调差,试动当过保不程护同中装电高置压中高回资中路料资交试料叉卷试时技卷,术调应问试采题技用,术金作是属为指隔调发板试电进人机行员一隔,变开需压处要器理在组;事在同前发一掌生线握内槽图部内 纸故,资障强料时电、,回设需路备要须制进同造行时厂外切家部断出电习具源题高高电中中源资资,料料线试试缆卷卷敷试切设验除完报从毕告而,与采要相用进关高行技中检术资查资料和料试检,卷测并主处且要理了保。解护现装场置设。备高中资料试卷布置情况与有关高中资料试卷电气系统接线等情况,然后根据规范与规程规定,制定设备调试高中资料试卷方案。

NOIP2011初赛模拟训练题

NOIP2011初赛模拟训练题

NOIP 2011初赛模拟训练题(Pascal 语言二小时完成)●●全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效●●一、单项选择题(共10题,每题1.5分,共计15分。

每题有且仅有一个正确答案)。

1、微型计算机中,( ) 的存取速度最快。

A.高速缓存B.外存储器C. 寄存器D. 内存储器E. 临时存储器2、已知A=35H,则A∧05H∨A∧3OH的结果是:( ) 。

A)3OH B)05H C) 32H D) 53H E)35H3、GB2312-80规定了一级汉字3755个,二级汉字3008个,其中二级汉字字库中的汉字是以()为序排列的。

A.以笔划多少B.以部首C.以ASCⅡ码D.以机内码E.以拼音4、在config.sys文件中,装入特定的可安装设备驱动程序的命令是().A.buffer B.files C.xcopy D.device E. load5、启动计算机引导DOS是将操作系统()A. 从磁盘调入中央处理器B. 从内存储器调入高速缓冲存储器C. 从软盘调入硬盘D. 从系统盘调入内存储器E. 从系统盘调入中央处理器6、Ip v6地址是由( ) 位二进制数码表示的。

A.16 B.32 C. 128 D. 64 E. 87、设有一个含有13个元素的Hash表(0~12),Hash函数是:H(key)=key % 13,其中% 是求余数运算。

用线性探查法解决冲突,则对于序列(2、8、31、20、19、18、53、27),18应放在第几号格中( ) 。

A. 9B.5C. 4D. 0E. 78、在有N个叶子节点的哈夫曼树中,其节点总数为()A.不确定B. 2N-1C. 2N+1D. 2NE. N+19、表达式(1+34)*5-56/7 的后缀表达式为()。

A. 1+34*5-56/7B. -*+1 34 5/56 7C. 1 34 +5*56 7/-D. 1 34 5* +56 7/-E. 1 34+5 56 7-*/10、计算机软件保护法是用来保护软件( )的。

衢州市第十七届(中国电信杯)青少年信息学(计算机)竞赛初赛试题(高中组PASCAL语言)

衢州市第十七届(中国电信杯)青少年信息学(计算机)竞赛初赛试题(高中组PASCAL语言)

衢州市第十七届(中国电信杯)青少年信息学(计算机)竞赛初赛试题(高中组PASCAL语言)1、CPU的英文全称()。

A.Central Processing Unit B.Contral Processing UnitC.Command Processing Unit A.Chip Processing Unit2、光盘上记录数据位0,是用()表示的。

A.平坦部分 B.凹坑部分 C.边沿部分 D.平坦和凹坑两部分3.DES是一种()。

A.网络服务 B.数据压缩标准 C.网络协议 D.密码体制4.表示存储的容最时,经常碰到K,M,G,T等字母,它们部表示一个具体的数值,其中T 代表()A.210 B.220 C.230 D.240DES是一套基于DirectShow核心框架的编程接口。

DES的出现,简化了视频编辑任务,弥补了DirectShow对于媒体文件非线性编辑支持的先天性不足。

但是,就技术本身而言,DES 并没有超越DirectShow Filter架构,而只是DirectShow Filter的一种增强应用5.网页中可以插入的动画格式有()。

A.dwg B.gif C.bmp D.jpg6、在同—张软盘上()。

A.允许同一子目录中的两个文件同名,也允许不同子目录中的两个文件同名B.不允许同一子目录中的两个文件同名,但允许不同子目录中的两个文件同名C.允许同一子目录中的两个文件同名,但不允许不同子目录中的两个文件同名D.不允许同一子目录中的两个文件同名,也不允许不同子目录中的两个文件同名7.微机内的存储器的地址是以()编址的。

A.二进制位 B.字长 C.字节 D.微处理器的型号8.在24*24点阵的字库中,汉字“一”与“编”的字模占用字节数分别是()。

A.32、32 B.32、72 C.72、72 D.72、329.因特网目前所使刚的IP协议地址长度是32位二进数(4字节),新一代IP协议IPv6所规定的地址长度为()。

pascal竞赛试题及答案

pascal竞赛试题及答案

一、单项选择题(共20题,每题1.5分,共计30分。

每题有且仅有一个正确答案。

)1.在以下各项中,()不是CPU的组成部分。

A.控制器B.运算器C.寄存器D.主板2.在关系数据库中,存放在数据库中的数据的逻辑结构以()为主。

A.二叉树B.多叉树C.哈希表D.二维表3.在下列各项中,只有()不是计算机存储容量的常用单位。

A.Byte B.KB C.UB D.TB4.ASCII码的含义是()。

A.二→十进制转换码B.美国信息交换标准代码C.数字的二进制编码D.计算机可处理字符的唯一编码5.一个完整的计算机系统应包括()。

A.系统硬件和系统软件B.硬件系统和软件系统C.主机和外部设备D.主机、键盘、显示器和辅助存储器6.IT的含义是()。

A.通信技术B.信息技术C.网络技术D.信息学7.LAN的含义是()。

A.因特网B.局域网C.广域网D.城域网8.冗余数据是指可以由其它数据导出的数据。

例如,数据库中已存放了学生的数学、语文和英语的三科成绩,如果还存放三科成绩的总分,则总分就可以看作冗余数据。

冗余数据往往会造成数据的不一致。

例如,上面4个数据如果都是输入的,由于操作错误使总分不等于三科成绩之和,就会产生矛盾。

下面关于冗余数据的说法中,正确的是()。

A.应该在数据库中消除一切冗余数据B.用高级语言编写的数据处理系统,通常比用关系数据库编写的系统更容易消除冗余数据C.为了提高查询效率,在数据库中可以保留一些冗余数据,但更新时要做相容性检验D.做相容性检验会降低效率,可以不理睬数据库中的冗余数据9.在下列各软件,不属于NOIP竞赛(复赛)推荐使用的语言环境有()。

A.gcc B.g++ C.Turbo C D.Free Pascal 10.以下断电后仍能保存数据的有()。

A.硬盘B.高速缓存C.显存D.RAM11.在下列关于计算机语言的说法中,正确的有()。

A.高级语言比汇编语言更高级,是因为它的程序的运行效率更高B.随着Pascal、C等高级语言的出现,机器语言和汇编语言已经退出了历史舞台C.高级语言比汇编语言程序更容易从一种计算机上移植到另一种计算机上D.C是一种面向对象的高级计算机语言12.近20年来,许多计算机专家都大力推崇递归算法,认为它是解决较复杂问题的强有力的工具。

NOIP普及组初赛及答案Pascal

NOIP普及组初赛及答案Pascal

第十八届全国青少年信息学奥林匹克联赛初赛(普及组Pascal语言试题)选手注意:试题纸共有10页,答题纸共有2页,满分100分。

请在答题纸上作答,写在试题纸上一律无效。

不得使用任何电子设备(如计算器、手机、电子词典等)或查阅任何书籍资料一、单项选择题(共20题,每题1.5分,共计30分;每题且仅有一个正确选项)1.计算机如果缺少(),将无法正常启动。

A.内存B.鼠标C.U盘D.摄像头2.()是一种先进先出的线性表。

A.栈B.队列C.哈希表(散列表)D.二叉树3.目前计算机芯片(集成电路)制造的主要原料是(),它是一种可以在沙子中提炼出的物质。

A.硅B.铜C.锗D.铝4.十六进制数9A在()进制下是232。

A.四B.八C.十5.()不属于操作系统。

A.WindowsB.DOSD.十二C.PhotoshopD.NOI Linux6.如果一棵二叉树的中序遍历是BAC,那么它的先序遍历不可能是()。

A.ABCB.CBAC.ACBD.BAC7.目前个人电脑的()市场占有率最靠前的厂商包括Intel、AMD等公司。

A.显示器B.CPUC.内存D.鼠标8.使用冒泡排序对序列进行升序排列,每执行一次交换操作系统将会减少1个逆序对,因此序列5,4,3,2,1需要执行()次操作,才能完成冒泡排序。

A.0B.5C.10D.159.1946年诞生于美国宾夕法尼亚大学的ENIAC属于()计算机。

A.电子管B.晶体管C.集成电路D.超大规模集成电路10.无论是TCP/IP模型还是OSI模型,都可以视为网络的分层模型,每个网络协议都会被归入某一层中。

如果用现实生活中的例子来比喻这些“层”,以下最恰当的是()。

A.中国公司的经理与波兰公司的经理交互商业文件B.军队发布命令C.国际会议中,每个人都与他国地位对等的人直接进行会谈D.体育比赛中,每一级比赛的优胜者晋级上一级比赛11.矢量图(VectorImage)图形文件所占的贮存空间比较小,并且无论如何放大、缩小或旋转等都不会失真,是因为它()。

信息学初赛模拟试题(九、十)及答案

信息学初赛模拟试题(九、十)及答案

信息学初赛模拟试题(九)(中学组PASCAL语言,两小时完成)◆请将正确答案在答卷上填写,在本试题卷上答题无效◆◆一、选择题(共20题,每题1.5分,共计30分。

每题有5个备选答案,前10个题为单选题,即每题有且只有一个正确答案,选对得分,后10题为不定项选择题,即每题有1至5个正确答案,只有全部选对才得分)1.组建计算机网络的目的是为了能够相互共享资源,这里的计算机资源主要是指硬件、软件与___________。

A.大型机 B. 通信系统 C. 服务器 D. 数据 E.软件2.(101.101)2=(______)10A.5.625 B.5.5 C.3.525 D.5.4 E.5.23.对于一个24*24的汉字点阵来说,一个汉字所占存储量为_______个字节。

A.11 B.72 C.13 D.14 E. 364.连接到Internet上的每台计算机都必须有一个_______地址,该地址共______个字节。

前面若干字节表示______;后面若干字节表示_______。

为了避免使用数字,人们经常用字母代替,这些名字称为________。

A.IP、四、网络地址、计算机地址、网名B.网络、四、IP地址、网内计算机地址、域名C.网络、不超过十、网页、网址、网名D.IP、四、网络地址、网内计算机地址、域名E.域名、八、网络地址、网内计算机地址、网名5.插入排序是一种简单实用的工具,在对数组排序时,我们可能用二分查找,对要插入的元素快速找到在已经排好元素序列中的位置。

下面的描述中正确的是________。

A.二分查找的时间复杂度为O(lgN),因此排序的时间复杂度为O(N*lgN)B.二分查找的时间复杂度为O(N),因此排序的时间复杂度为O(N*lgN)C.二分查找的时间复杂度为O(lgN),排序的时间复杂度不变,为O(N*N)D.二分查找的时间复杂度为O(N),排序的时间复杂度不变,为O(N*N)E. 二分查找的时间复杂度为O(2N),排序的时间复杂度为0(N*N)6.OSI的七层协议中,最底层是_______。

武进区第一届中小学生信息学奥林匹克竞赛模拟试题

武进区第一届中小学生信息学奥林匹克竞赛模拟试题

武进区第一届中小学生信息学奥林匹克竞赛模拟试题(Pascal普及组考试时间120分钟)一、选择题(共20题,每题1.5分,共30分)1. 下列计算机设备中,既是输入设备,又是输出设备的是( )。

a) 键盘b)触摸屏c)扫描仪d)投影仪e)数字化仪2. 不同类型的存储器组成了多层次结构的存储器体系,按存取速度从快到慢排列的是( )a) 快存/辅存/主存b) 外存/主存/辅存c) 快存/主存/辅存d) 主存/辅存/外存3. 在微机中,通用寄存器的位数是( )a) 8位b) 16位c) 计算机字长d) 32位4. 计算机的运算速度取决于给定的时间内,它的处理器所能处理的数据量。

处理器一次能处理的数据量叫字长。

已知64位的奔腾处理器一次能处理64个信息,相当于多少字节( )a) 1个b) 2个c) 8个d) 16个5. 在计算机应用中,“计算机辅助设计”的英文缩写是( )a) CADb) CAEc) CAId) CAM6. 在24*24点阵的字库中,汉字“一”与“编”的字模占用字节数分别是( )a) 72、72b) 32、32c) 32、72d) 72、327. 十进制算术表达式:3*512+7*64+4*8+5的运算结果,用二进制表示为( )a) 10111100101b) 11111100101c) 11110100101d) 111111011018. 如果用一个字节来表示整数,最高位用作符号位,其他位表示数值。

例如:00000001表示+1,10000001表示-1,在这样的表示法中,以下哪种说法是正确的( )a) 范围内的每一个数都只有唯一的格式b) 范围内每一个数都有两种格式c) 范围内的一半数有两种格式d) 范围内只有一个数有两种表示格式9. Internet的规范译名应为( )a) 英特尔网b) 因特网c) 万维网d) 以太网10. 下列哪些计算机网络不是按覆盖地域划分的( )a) 局域网b) 都市网c) 广域网d) 星型网11. CPU访问内存的速度比访问下列哪个存储设备要慢( )。

1999年—2012年信息学奥赛提高组初赛试题PASCAL(附答案_完整)

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. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

第 1 页 共 6 页 中山市第一中学2009年初一年级第一次模拟赛 (初中组PASCAL语言,120分钟完成) ◆◆请将正确答案在答题卷上填写,在本试题卷上答题无效◆◆ 一、选择题(每题只有一个选项符合题目要求,多选无效,1.5*20=30分) 1、世界第一台电子计算机于( )在美国研制成功,采用的主要逻辑元件是( )。 A、1946 电子管 B、1946 晶体管 C、1947 电子管 D、1946 超大规模集成电路 2、个人计算机的主机包括( )。 A、运算器和显示器 B、CPU和内存储器 C、CPU和键盘 D、UPS和内存储器 3、当前微机中存储器访问速度正确的是( )。 A、RAM > Cache > 硬盘 > 软盘 B、Cache > 硬盘 > RAM > 软盘 C、RAM > 硬盘> 软盘> Cache D、Cache > RAM > 硬盘 > 软盘 4、Windows应用程序之间可以方便地通过( )交换数据。 A、 邮箱 B、文本区 C、对话框 D、剪贴板 5、(2008)10 + (5B)16的结果是( )。 A. (833)16 B. (2089)10 C. (4163)8 D. (100001100011)2

6、下列计算机设备中,既是输入设备,又是输出设备的是( )。

A.键盘 B.触摸屏 C.扫描仪 D.投影仪 E.数字化仪 7、常见的邮件传输服务器使用( )协议接收邮件。 A.HTTP B.SMTP C.TCP D.FTP E.POP3 8、设A=true,B=false,C=true,D=false,以下逻辑运算表达式值为真的是( )。 A. (A∧B)∨(C∧D∨A) B. ((A∧B)∨C)∧D C. (B∨C∨D)∧D∧A D. A∧(D∨C) ∨B 9、纯文本文件格式常用于保存( )文件。 A、声音 B、位图 C、网页 D、源程序 10、动态 RAM 的特点是( ), A、工作中需要动态地改变存储单元内容 B、工作中需要动态地改变访存地址 C、每隔一定时间需要刷新 D、每次读出后需要刷新 11、使用数据库的主要目的之一是为了解决数据的( )问题。 A、可靠性 B、传输 C、保密 D、共享 12、( )是一种串行总线规范,它支持设备热插拔 A、RS232 B、 EPP C、SCSI D、 USB 13、Internet是全球最大的开放式计算机互联网络。网中每一台主机都分配有惟一的( )位IP地址。 A、24 B、32 C、48 D、64 14、彩色显示器所显示的五彩斑斓的色彩,是由红色、蓝色和( )色混合而成的。 A. 紫 B. 白 C. 黑 D. 绿 E. 橙

15、为确保企业局域网的信息安全,防止来自Internet的黑客入侵或病毒感染,采用( ) 可以实现一定的防范作用。 第 2 页 共 6 页

A、网管软件 B、邮件列表 C、防火墙软件 D、防病毒软件 16、算法指的是( ) A、计算机程序 B、解决问题的计算方法 C、排序算法 D、解决问题的有限运算序列 17、设A=true,B=false,C=true,D=false,以下逻辑运算表达式值为真的是( )。 A. (A∧B)∨(C∧D∨A) B. ((A∧B)∨C)∧D C. (B∨C∨D)∧D∧A D. A∧(D∨C)∧B 18、一个栈的输入序列为1 2 3 4 5,则下列序列中不可能是栈的输出序列的是( ) A、2 3 4 1 5 B、5 4 1 3 2 C、2 3 1 4 5 D、1 5 4 3 2 19、二叉树T,已知其后根遍历是4 2 7 5 6 3 1(数字为结点编号,以下同),中根遍历是2 4 1 5 7 3 6,则该二叉树的先根遍历是( )。 A. 4 2 5 7 6 3 1 B. 7 4 2 5 6 3 1 C. 1 2 4 3 5 7 6 D. 4 2 7 6 5 3 1 20、若待排序对象序列在排序前已按其排序码序列递增排列,则采用( )方法比较次数最少。 A、直接插入排序 B、快速排序 C、归并排序 D、直接选择排序

二、问题求解(每题5分,共10分) 1、(取石子游戏) 现有5堆石子,石子数依次为173,15,17,129,46,甲乙两人轮流从任一堆中任取(每次只能取自一堆,不能不取), 取最后一颗石子的一方获胜。甲先取,问甲有没有获胜策略(即无论乙怎样取,甲只要不失误,都能获胜)?如果有,甲第一步应该在哪一堆里取多少?请写出你的结果: 。

2、递推。某商店有m种不同颜色的小球且每种小球的数量都足够多。要在这m种不同颜色的小球里挑选出n个小球,设共有s种不同的选法。例如当m=2,n=3时,s=4,也就是说,共有4种不同的选法。(分别为:【0,3】,【1,2】,【2,1】,【3,0】)。现在,令m=5,n=4,试求出选法数s= 。

三、阅读程序,写出程序运行的结果:(第1、2题每题7分,第3、4题每题8分,共30分) 1、 program t1; var x,y:integer; u,v:array[0..3] of integer; begin for x:= 0 to 3 do read(u[x]); v[0]:=u[0]+u[2]; v[1]:=v[0]+u[2]; v[2]:=(u[0]-u[1]-u[2]) MOD u[1]-4; v[3]:=(v[0]-v[1]-v[2]) DIV u[0]; x:= v[0]+v[1] MOD v[2] DIV v[3]; if x<10 then y:=v[0]+v[1]+v[2]+v[3] else y:=10+u[0]+v[1]+v[2]+v[3]; write(x,':',y); end. 第 3 页 共 6 页

输入:3 8 11 15 输出:

2、 program t2; var n,i,j:Longint; s:Array [1..100] of integer; begin readln(n);i:=0; repeat inc(i); if n mod 2=1 then s[i]:=1 else s[i]:=0; n:=n div 2; until n=0; for j:=i downto 1 do write(s[j]);writeln; end. 输入:2004 输出:

3、 program t3; var a,b,f:integer; function gcd(n,m:integer):integer; begin if n=0 then gcd:=m else gcd:=gcd(m mod n ,n); end; begin readln(a,b); f:=gcd(a,b); writeln(f) end. 输入: 3012 1024 输出:

4、 program t4; var n,k,j:integer; a:array[1..40] of integer; procedure sub(x:integer); var j1,j2,p,s:integer; begin j1:=0;p:=1; while p=1 do begin 第 4 页 共 6 页

j1:=j1+1; s:=0; for j2:=1 to n do if a[j2]>a[j1] then s:=s+1; if s=x-1 then begin writeln(a[j1]);p:=0 end; end; end; begin readln(n,k); for j:=1 to n do read(a[j]); readln; sub(k); sub(n-k); readln; end. 输入:10 4 12 1 5 65 132 87 7 68 99 13 输出:

四、完善程序题( 每空3分,共30分) 1、【问题描述】integer类型的范围是-32768~32767,Longint类型的范围是 -2147483648 ~ 2147483647 , int64 类型的范围是-9223372036854775808 ~ 9223372036854775807 ,现在要写一个加法的程序。输入

两个数a和b,输出它们的和。So easy?当a和b是100位正整数的时候,计算机编程语言便没有类型可以存在,如果强力输入会出错。所以我们写了一个特殊的程序。 输入:a,b(0输出:a+b。

【程序清单】 program jiafa; var a,b:string; x,y,z:array[0..200]of longint; i,len:longint; begin readln(a); readln(b);

x[0]:=length(a); for i:=1 to x[0] do x[i]:=ord(a[x[0]-i+1])-48;

① for i:=1 to y[0] do y[i]:=ord( ② )-48;

for i:=1 to x[0] do z[i]:=x[i];

for i:=1 to y[0] do z[i]:= ③ ;

if (x[0]>y[0]) then

相关文档
最新文档