全国青少年信息学奥林匹克竞赛(高中组)初赛试题及答案
- 格式:doc
- 大小:363.00 KB
- 文档页数:10
NOI a[i]1.① 0② inchah[i, ]或者 hah[i][]:= hah[i][]1③ wor,,tot1④ dechah[i, ] 或者 hah[i][]:= hah[i][]-1⑤ wor0,0,0注意:②④两空,不一定要1 或者 -1。
也可以是④ -1 , ② 1 也可以是 , 也可以 - , 甚至任何加标记的操作如位运算都可以,只要相互撤销。
(所以答案非常多)。
附:关于NOIP2022初赛普及组Paca语言一道题目的问题与阅卷处理意见经查,NOIP2022初赛普及组(Paca版本)第四大题(阅读程序写结果)第4小题题目中存在一处数据输入格式的错误:该题提供的输入为“NOIP 3”,本意是分别读入到一个字符串和整型变量中,但是由于本题的输入在同一行,数据中缺少一个换行,按照程序的写法,Paca语言会将这一行输入都作为字符串读入,而无法读到3,因此程序的实际运行无法得到答案给出的结果。
经过讨论,该题在阅卷时接受以下三种情况的答案(仅限Paca语言,不涉及C/C语言的试卷),即以下3种情形均可得分:(注:按照题目本意理解并正确完成)。
3 (注:此种情况是输入“NOIP 3”后,程序等待继续输入时,输入CtrZ结束输入,也包括文件流定向到标准输入的情形)。
3结果处给出适当文字说明,例如“等待输入”;“程序无法结束”;“根据不同的n值,输出结果不同”等,各地阅卷小组可灵活掌握。
但结果处简单空白且不加任何说明将不给分。
烦请各地特派员及时通知至阅卷小组。
对于因我们的失误和疏忽所造成的后果深表歉意。
如有其它问题请随时联系。
NOI科学委员会2009-10-19。
第二十三届全国青少年信息学奥林匹克联赛初赛普及组C++语言试题竞赛时间:2017 年10 月14 日14:30~16:30选手注意:● 试题纸共有7页,答题纸共有2页,满分100分。
请在答题纸上作答,写在试题纸上的一律无效。
● 不得使用任何电子设备(如计算器、手机、电子词典等)或查阅任何书籍资料。
一、单项选择题(共20 题,每题1.5 分,共计30 分;每题有且仅有一个正确选项)1. 在8 位二进制补码中,10101011 表示的数是十进制下的(B)。
A. 43B. -85C. -43D. -842. 计算机存储数据的基本单位是(B)。
A. bitB. ByteC. GBD. KB3. 下列协议中与电子邮件无关的是(C)。
A. POP3B. SMTPC. WTOD. IMAP4. 分辨率为800x600、16 位色的位图,存储图像信息所需的空间为(A)。
A. 937.5KBB. 4218.75KBC. 4320KBD. 2880KB5. 计算机应用的最早领域是(A)。
A. 数值计算B. 人工智能C. 机器人D. 过程控制6. 下列不属于面向对象程序设计语言的是(A)。
A. CB. C++C. JavaD. C#7. NOI 的中文意思是(B)。
A. 中国信息学联赛B. 全国青少年信息学奥林匹克竞赛C. 中国青少年信息学奥林匹克竞赛D. 中国计算机协会8. 2017 年10 月1 日是星期日,1999 年10 月1 日是(C)。
A. 星期三B. 星期日C. 星期五D. 星期二9. 甲、乙、丙三位同学选修课程,从4 门课程中,甲选修2门,乙、丙各选修3门,则不同的选修方案共有(C)种。
A. 36B. 48C. 96D. 19210. 设G 是有n个结点、m 条边(n ≤m)的连通图,必须删去G的(A)条边,才能使得G变成一棵树。
A. m – n + 1B. m - nC. m + n + 1D. n – m + 111. 对于给定的序列{a k},我们把 (i, j) 称为逆序对当且仅当i < j 且a i > a j。
第十五届全国青少年信息学奥林匹克联赛初赛试题答案第十五届全国青少年信息学奥林匹克联赛初赛试题(普及组 C语言二小时完成)● 全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效●●3 单项选择题(共20题,每题1.5分,共计30分。
每题有且仅有一个正确答案。
)1、关于图灵机下面的说法哪个是正确的:DA) 图灵机是世界上最早的电子计算机。
B) 由于大量使用磁带操作,C) 图灵机运行速度很慢。
D) 图灵机是英国人图灵发明的,E) 在二战中为破译德军的密码发挥了重要作用。
F) 图灵机只是一个理论上的计算模型。
2、关于计算机内存下面的说法哪个是正确的:BD) 随机存储器(RAM)的意思是当程序运行时,每次具体分配给程序的内存位置是随机而不确定的。
E) 1MB内存通常是指1024*1024字节大小的内存。
F) 计算机内存严格说来包括主存(memory)、高速缓存(cache)和寄存器(register)三个部分。
G) 一般内存中的数据即使在断电的情况下也能保留2个小时以上。
3、关于BIOS下面说法哪个是正确的:AA) BIOS是计算机基本输入输出系统软件的简称。
B) BIOS里包含了键盘、鼠标、声卡、显卡、打印机等常用输入输出设备的驱动程序。
C) BIOS一般由操作系统厂商来开发完成。
D) BIOS能提供各种文件拷贝、复制、删除以及目录维护等文件管理功能。
4、关于CPU下面哪个说法是正确的:AA) CPU全称为中央处理器(或中央处理单元)。
B) CPU可以直接运行汇编语言。
C) 同样主频下,32位的CPU比16位的CPU运行速度快一倍。
D) CPU最早是由Intel公司发明的。
5、关于ASCII,下面哪个说法是正确的:BA) ASCII码就是键盘上所有键的唯一编码。
B) 一个ASCII码使用一个字节的内存空间就能够存放。
C) 最新扩展的ASCII编码方案包含了汉字和其他欧洲语言的编码。
D) ASCII码是英国人主持制定并推广使用的。
第二年全国青少年信息学(计算机)奥林匹克分区联赛高中初赛试题〔高中组〕〔PASCAL语言竞赛用时:2小时〕●●全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效●●【一】基础知识部分:〔39分〕1.A盘上的目录和文件组织如下:〔2+3=5分〕其中TP、TB、DOS、D11、D31基本上子目录名。
设当前命令提示符为A:\TB>,请写出完成如下操作的DOS命令:①在DOS运行中,没有执行过PATH命令,现要用DOS子目录中的FORMAT命令,对插入在B驱动器〔5.25英寸高密〕中的360KB软盘进行格式化工作,请写出相应的操作命令。
②交换F2.TXT与F3.DOC两个文件的内容。
2、请用等号或不等号联接表示以下不同进位制数值的大小。
〔3分〕例如:〔3〕10<(4)10=(100)2<(A)16其中圆括号外右下角的下标,表示圆括号内数的进位制。
〔98.375〕10(142.3)8(58.5)16(1011000.0101)23、阅读以下程序段,写出程序运行后数组元素A1,A2,…,A11中的值。
〔6分〕A[1]:=1;A[2]:=1;K:=1;REPEATA[K+2]:=1;FORI:=K+1DOWNTO2DOA[I]:=A[I]+A[I-1];K:=K+1;UNTILK>=10;4、:ACK〔M,N〕函数的计算公式如下:〔4%〕N+1M=0ACK〔M,N〕=ACK〔M-1,1〕N=0ACK〔M-1,ACK〔M,N-1〕M≠0且N≠0请计算:ACK〔1,3〕、ACK〔2,4〕、ACK〔3,3〕、ACK〔3,4〕5、有N×N个数据组成如下方阵:〔5分〕A11A12A13 (1)A21A22A23 (2)A31A32A33 (3)…………A N1A N2A N3……A NN并:A ij=A ji现将A11,A21,A22,A31,A32,A33,…存储在一维数组A[1],A[2],…,A[〔N*〔N+1〕〕/2]中。
第七届全国青少年信息学奥林匹克分区联赛初赛试题一、选择一个正确答案代码(A/B/C/D),填入每题的括号内(每题 1.5分,多选无分,共30分)1、在计算机内部,一切信息存取、处理和传递的形式是( C )A:ASCⅡ码B:BCD码C:二进制D:十六进制2、在树型目录结构中,不允许两个文件相同主要指的是( D )A:同一个磁盘的不同目录下B:不同磁盘的同一个目录下C:不同磁盘伯不同目录下D:同一个磁盘的同一个目录下3、WORD是一种( B )A:操作系统B:文字处理软件C:多媒体制作软件D:网络浏览器4、计算机软件保护法是用来保护软件( D )的。
A:编写权B:复制权C:使用权D:著作权5、下面关于算法的错误说法是( B )A:算法必须有输出B:算法必须在计算机上用某种语言实现C:算法不一定有输入D:算法必须在有限步执行后能结束6、解释程序的功能是( C )A:将高级语言程序转换为目标程序B:将汇编语言程序转换为目标程序C:解释执行高级语言程序D:解释执行汇编语言程序7、与二进制数101.01011等值的十六进制数为( B )A:A.BB:5.51C:A.51D:5.588、断电后计算机信息依然存在的部件为( C )A:寄存器B:RAM存储器C:ROM存储器D:运算器9、2KB的内存能存储( A )个汉字的机内码A:1024B:516C:2048D:21810、DOS暂驻区中的程序主要是用于( A )A:执行DOS内部命令B:执行DOS外部命令C:执行DOS所有命令D:基本输入输出11、若我们说一个微机的CPU是用的PⅡ300,此处的300确切指的是( A ) A:CPU的主时钟频率B:CPU产品的系列号C:每秒执行300百万条指令D:此种CPU允许最大内存容量12、运算17 MOD 4的结果是( C )A:7B:3C:1D:413、应用软件和系统软件的相互关系是( B )A:后者以前者为基础B:前者以后者为基础C:每一类都以另一类为基础D:每一类都不以另一类为基础14、以下对WINDOWS的叙述中,正确的是( A )A:从软盘上删除文件和文件夹,不送回到回收站B:在同一个文件夹中,可以创建两个同类、同名的文件C:删除了某个应用程序的快捷方式,将删除该应用程序对应的文件D:不能打开两个写字板应用程序15、E-mail邮件本质上是一个( A )A:文件B:电报C:电话D:传真16、计算机病毒是( B )A:通过计算机传播的危害人类健康的一种病毒B:人为制作的能够侵入计算机系统并给计算机带来故障的程序或指令集合C:一种由于计算机元器件老化而产生的对生态环境有害的物质D:利用计算机的海量高速运算能力而研制出来的用于疾病预防的新型病毒17、下列设备哪一项不是计算机输入设备( D )A:鼠标B:扫描仪C:数字化仪D:绘图仪18、在计算机硬件系统中,cache是( D )存储器A:只读B:可编程只读C:可擦可编程只读D:高速缓冲19、在顺序表(2,5,7,10,14,15,18,23,35,41,52)中,用二分法查找12,所需的关键码比较的次数为( C )A:2B:3C:4D:520、若已知一个栈的入栈顺序是1,2,3,…,n,其输出序列为P1,P2,P3,…Pn,若P1是n,则Pi是( C )A:iB:n-iC:n-i+1D:不确定二、问题求解(5+7=12分)1、在a,b,c,d,e,f六件物品中,按下面的条件能选出的物品是: a,b,c,f⑴a,b两样至少有一样⑵a,d不能同时取⑶a,e,f中必须有2样⑷b,c要么都选,要么都不选⑸c,d两样中选一样⑹若d不选,则e也不选2、平面上有三条平行线,每条直线上分别有7,5,6个点,且不同直线上三个点都不在同一直线上。
第十六届全国青少年信息学奥林匹克联赛初赛试题一. 单项选择题(共20题,每题1.5分,共计30分。
每题有且仅有一个正确答案。
)1.2E+03表示()。
A.2.03B.5C.8D.20002.一个字节(byte)由()个二进制位组成。
A.8B.16C.32D.以上都有可能3.以下逻辑表达式的值恒为真的是()。
A.P∨(﹁P∧Q) ∨(﹁P∧﹁Q)B.Q∨(﹁P∧Q) ∨(P∧﹁Q)C. P∨Q∨(P∧﹁Q) ∨(﹁P∧Q)D.P∨﹁Q∨(P∧﹁Q) ∨(﹁P∧﹁Q)4.Linux下可执行文件的默认扩展名为()。
A.exeC.dllD.以是都不是5.如果树根算是第1层,那么一棵n层的二叉树最多有()结点。
A.2n-1B.2nC.2n+1D.2n+16.提出“存储程序”的计算机工作原理的是()。
A.克劳德·香农B.戈登·摩尔C.查尔斯·巴比奇D.冯·诺依曼7.设X、Y、Z分别代表三进制下的一位数字,若等式XY+ZX=XYX在三进制下成立,那么同样在三进制下,等式XY×ZX=()也成立。
A.YXZB.ZXYC.XYZD.XZY9.前缀表达式“+3×2+5 12”的值是()。
A.23B.25C.37D.6510.主存储器的存取速度比中央处理器(CPU)的工作速度慢得多,从而使得后者的效率受到影响。
而根据局部性原理,CPU所访问的存储单元通常都趋于聚集在一个较小的连续区域中。
于是,为了提高系统整体的执行效率,在CPU中引入了()。
A.寄存器B.高速缓存C.闪存D.外存11.一个字长为8位的整数的补码是11111001,则它的原码是()。
A.00000111B.01111001C.11111001D.1000011112.基于比较的排序时间复杂度的下限是(),其中n表示待排序的元素个数。
A.O(n)B.O(n log n)C.O(log n) d.O(n2)13.一个自然数在十进制下有n位,则它在二进制下的位数与()最接近。
第二十三届全国青少年信息学奥林匹克联赛初赛提高组 C++语言试题竞赛时间:2017 年 10 月 14 日 14:30~16:30(WORD重新整理排版)选手注意:●试题纸共有 10 页,答题纸共有 2 页,满分 100 分。
请在答题纸上作答,写在试题纸上的一律无效。
●不得使用任何电子设备(如计算器、手机、电子词典等)或查阅任何书籍资料。
一、单项选择题(共 15 题,每题 1.5 分,共计 22.5 分;每题有且仅有一个正确选项)1. 从()年开始,NOIP 竞赛将不再支持 Pascal 语言。
A. 2020B. 2021C. 2022D. 20232. 在 8 位二进制补码中,10101011 表示的数是十进制下的()。
A. 43B. -85C. -43D. -843. 分辨率为 1600x900、16 位色的位图,存储图像信息所需的空间为()。
A. 2812.5KBB. 4218.75KBC. 4320KBD. 2880KB4. 2017 年 10 月 1 日是星期日,1949 年 10 月 1 日是()。
A. 星期三B. 星期日C. 星期六D. 星期二5. 设 G 是有 n 个结点、m 条边(n ≤ m)的连通图,必须删去 G 的()条边,才能使得 G 变成一棵树。
A. m – n + 1B. m - nC. m + n + 1D. n – m + 16. 若某算法的计算时间表示为递推关系式:T(N) = 2T(N / 2) + N log NT(1) = 1则该算法的时间复杂度为()。
A. O(N)B. O(N log N)C. O(Nlog2N)D. O(N2 )7. 表达式 a * (b + c) * d 的后缀形式是()。
A. a b c d * + *B. a b c + * d *C. a * b c + * dD. b + c * a * d8. 由四个不同的点构成的简单无向连通图的个数是()。
第二年全国青少年信息学(计算机)奥林匹克分区联赛高中初赛试卷(高中组)(PASCAL 语言竞赛用时:2小时)●●全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效●●一、基础知识部分:(39分)1.已知A盘上的名目和文件组织如下:(2+3=5分)其中TP、TB、DOS、D11、D31差不多上子名目名。
设当前命令提示符为A:\TB> ,请写出完成如下操作的DOS 命令:①在DOS运行中,没有执行过PATH命令,现要用DOS子名目中的FORMAT命令,对插入在B驱动器(5.25英寸高密)中的360KB软盘进行格式化工作,请写出相应的操作命令。
②交换F2.TXT与F3.DOC两个文件的内容。
2.请用等号或不等号联接表示下列不同进位制数值的大小。
(3分)例如:(3)10 <(4)10 =(100)2 < ( A )16其中圆括号外右下角的下标,表示圆括号内数的进位制。
(98.375)10 (142.3)8 (58.5)16 (1011000.0101)23.阅读下列程序段,写出程序运行后数组元素A1,A2,…,A11中的值。
(6分)A[1]:=1;A[2]:=1 ;K:=1 ;REPEATA[K+2]:=1 ;FOR I:=K+1 DOWNTO 2 DOA[I]:=A[I] +A[I-1 ] ;K:=K+1 ;UNTIL K>=10 ;4.已知:ACK(M,N)函数的运算公式如下:(4%)N+1 M=0ACK(M,N)= ACK(M-1,1)N=0ACK(M-1,ACK(M,N-1)M≠0 且N≠0 请运算:ACK(1,3)、ACK(2,4)、ACK(3,3)、ACK(3,4)5.有N×N个数据组成如下方阵:(5分)A11 A12A13 (1)A21A22 A23 (2)A31 A32A33 (3)…………A N1A N2A N3……A NN并已知:A ij = A ji现将A11 ,A21,A22 ,A31,A32,A33 ,…储备在一维数组A[1],A[2],…,A[(N*(N+1))/2] 中。
第二十三届全国青少年信息学奥林匹克联赛初赛提高组 C++语言试题竞赛时间:2019 年 10 月 14 日 14:30~16:30选手注意:●试题纸共有 10 页,答题纸共有 2 页,满分 100 分。
请在答题纸上作答,写在试题纸上的一律无效。
●不得使用任何电子设备(如计算器、手机、电子词典等)或查阅任何书籍资料。
一、单项选择题(共 15 题,每题 1.5 分,共计 22.5 分;每题有且仅有一个正确选项)1. 从()年开始,NOIP 竞赛将不再支持 Pascal 语言。
A. 2020B. 2021C. 2022D. 20232. 在 8 位二进制补码中,10101011 表示的数是十进制下的()。
A. 43B. -85C. -43D. -843. 分辨率为 1600x900、16 位色的位图,存储图像信息所需的空间为()。
A. 2812.5KBB. 4218.75KBC. 4320KBD. 2880KB4. 2019 年 10 月 1 日是星期日,1949 年 10 月 1 日是()。
A. 星期三B. 星期日C. 星期六D. 星期二5. 设 G 是有 n 个结点、m 条边(n ≤ m)的连通图,必须删去 G 的()条边,才能使得 G 变成一棵树。
A. m – n + 1B. m - nC. m + n + 1D. n – m + 16. 若某算法的计算时间表示为递推关系式:T(N) = 2T(N / 2) + N log NT(1) = 1则该算法的时间复杂度为()。
A.O(N)B. O(N log N)C. O(Nlog2N)D. O(N2 )解:当a=b=2、f(n)=nlgn时候(lgn:log2n的简记),计算递归方程的解。
T(n)= 2T(n/2)+nlgn。
T(n/2)= 2T(n/22)+(n/2)lg(n/2)。
T((n/22)= 2T(n/23)+ (n/22)lg(n/22)。
信息学奥林匹克分区联赛初赛模拟题(PASCAL语言竞赛用时:2小时)一、选择填空:(30%,每题1.5%)1、操作系统是一类重要的系统软件,下面几个软件中不属于操作系统的是____。
(A)MS-DOS (B)UNUX (C)PASCAL (D)WINDOWS 982、在计算机内部,用来传送、存储、加工处理的数据或指令(命令)都是以_____形式进行的。
(A)十进制码 (B)智能拼音码(C)二进制码 (D)五笔字型码3、已知计算机C:\DOS下有一个正确的文件,当执行如下命令:C:\>FORMAT A:<回车>得到的回答是bad command or file name提示信息,下面解释正确的是_______。
(A)根目录中没有AUTOEXEC.BAT文件;(B)在执行该命令前操作者没执行过PATH命令;(C)C:\DOS中的文件有错(D)由于AUTOEXEC.BAT或操作者最后执行过的PATH命令中缺少路径C:\DOS,或者根本没有执行过PATH命令。
4、将A盘上50个文件用:C:\>COPY A:*.*命令复制到C盘的当前目录中。
在复制到某一个文件时,由于读数据出错,屏幕显示:Abort, Retry, Ignore, Fail?键入“I”后,继续复制没再出现过出错信息。
最后复制的结果是_______。
(A)读数据出错的文件不正确,其他文件正确;(B)读数据出错的文件不正确,其他文件也不正确;(C)读数据出错的文件正确,其他文件不正确;(D)复制的文件全正确;5、表达式(4 MOD (-3))与(-4 MOD 3)的值为:_______。
(A)-1,-1 (B)1,-1(C)-1,1 (D)1,16、小张用十六进制,八进制和十进制写了一个等式:52-19=33,式中三个数是各不相同进位制的数,试问52,19,33,分别为________。
(A)八进制,十进制,十六进制(B)十进制,十六进制,八进制(C)八进制,十六进制,十进制(D)十进制,八进制,十六进制7、某班有50名学生,每位学生发一张调查卡,上写a, b, c三本书的书名,将读过的书打√,结果统计数字如下:只读a者8人;只读b者4人;只读c者3人;全部读过的有2人;读过a,b两本书的有4人;读过a,c两本书的有2人;读过b,c两本书的有3人。
NOI’95 “同创杯”全国青少年信息学(计算机)奥林匹克竞赛分区联赛初赛试题(高中组)竞赛用时:2小时一、基础题:<1> 执行①C>DIR 命令后,屏幕上显示如下画面:FORMAT COM 12145SYS COM 4878PUC BAT 126XCOPY EXE 112164 FILE(S)123456 bytes free接着又顺序执行了如下几条DOS 命令:②C>DIR> DF.TXT //表示将列表显示的目录作为文件写盘//③C>TYPE DF.TXT④C>DIR试问:执行命令③和④在屏幕上显示的结果是否与①相同?<2> 列举一个问题,使问题的解能对应相应的算法。
例如对算法:X:=10;Y:=5;READ(M,N);S:=X*M-Y*N;可列举出如下的问题:学生答题,答对一题可得10分,答错一题则要扣去5分,输入答对的题数(M)与答错的题数(N),求最后得分(S)是多少?现有以下算法:K:=0 ;FOR I:=0 TO 10 DOK:=K+(50-I*5)DIV 2+1请列出一个相应的问题。
<3> 有标号为A、B、C、D和1、2、3、4的8个球,每两个球装一盒,分装4盒。
标号为字母的球与标号为数字的球有着某种一一对应的关系(称为匹配),并已知如下条件:①匹配的两个球不能在一个盒子内。
②2号匹配的球与1号球在一个盒子里。
③A号和2号球在一个盒子里。
④B匹配的球和C号球在一个盒子里。
⑤3号匹配的球与A号匹配的球在一个盒子里。
⑥4号是A或B号球的匹配球。
⑦D号与1号或2号球匹配。
请写出这四对球匹配的情况。
<4> 从入口(1)到出口(17)的可行路线图中,数字标号表示关卡:现将上面的路线图,按记录结构存储如下:1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18请设计一种能从存储数据中求出从入口到出口经过最少关卡路径的算法。
二、根据题目要求,补充完善以下伪代码程序:<1> 求出二个整形数组错位相加的最大面积。
1.数组面积的定义:(限定数组头尾不为0)设有一个数组C=(4,8,12,0,6)则C 的面积为: Sc=(4+8)/2 + (8+12)/2 + 12/2 + 6/2也就是说,Sc=各梯形面积之和(其中 梯形的高约定为1,三角形作为梯形的特殊情况处理)。
又如D=(12, 24, 6)是,其面积的定义为2.数组错位相加的定义设有2个正整数的数组a ,b ,长度为n ,当n=5时:a=(34,26,15,44,12) b=(23,46,4,0,18)对a 、b 进行错位相加,可能有下列情况34 26 15 44 12+) 23 46 4 0 1834 26 15 44 12 23 46 4 0 18或:34 26 15 44 12+) 23 46 4 0 1834 26 15 44 35 46 4 0 18或:34 26 15 44 12+) 23 46 4 0 1834 26 15 67 58 4 0 18或:……最后有:34 26 15 44 12+) 23 46 4 0 18 -23 46 4 0 18 34 26 15 44 12可以看到:由于错位不同,相加的结果也不同。
程序要求:找出一个错位相加的方案,使得输出的数组面积为最大。
[算法提要]: 设a ,b 的长度为10,用a,b: array[1..10] of integer 表示,其结果用数组C,D:array[1..30] of integer 表示。
错位相加的过程可以从开始不重叠,然后逐步重叠,再到最后的不重叠。
梯形面积的计算公式为:(上底+下底)×高÷2其中由于约定高为1,故可写为(上底+下底)÷2。
12 24 6 4 8 12 1 6 1 1 1 Sd=(12+24)/2 + (24+6)/21 1程序:n = 10;Function sea : real; {计算数组C面积}BeginJ1 := 1;While _______①______ doj1 := j1 + 1;ENDWHILE;If j1 = 3 * n then sea := 0Else beginJ2 := 3 * n;While _______②______ doj2 := j2 - 1;If j1 = j2 then sea := 0Else beginJ3 := c[j1] + c[j2];For j4 := j1 + 1 to j2 - 1 doINC(j3,c[j4]*2);ENDFOR;Sea := j3 / 2endENDIF;End;//主程序//For i := 1 to n do read(a[I]); endfor;For j := 1 to n do read(b[j]); endfor;__________③____________;for i := 1 to 2 * n + 1 dofor j := 1 to 3 * n do ________④__________ endfor;for j := 1 to n do c[j + n] := a[j] endfor;for j := 1 to n do_________⑤__________;endfor;p := sea;if p > s then begind := c;s := pend;endif;endfor;for I := 1 to 3 * n do write(d[I],' '); endfor;write(s);End. //主程序结束//<2> 表的操作:设有一个表,记为L=(a1, a2, …, a n),其中:L:表名a1, a2, …, a n为表中的元素当a i为0~9数字时,表示元素,a i为大写字母时, 表示是另一个表,但不能循环定义。
例如下列表的定义是合法的。
(约定L是第一个表的表名)L=(1,3,K,8,0,4)K=(3,P,4,H,7)P=(2,3)H=(4,0,5,3)程序要求:当全部表给出之后,求出表中所有元素的最大元素,以及表中全部元素的和。
[算法提要]:表用记录类型定义:长度(LENGTH)表体(是元素为字符类型的数组ELEMENT)队列用数组BASE表示;队列指针用整型变量FRONT 与REAR。
为此,设计一个字符入队的过程inqueue,出队函数outqueue,表中最大元素及元素求和均采用递归计算。
程序:PROCEDURE INQUEUE(Q,C); //过程需要二个参数,Q记录类型,C字符类型// Q.REAR := _________①__________;Q.BASE[Q.REAR] := C;END; //过程结束//FUNCTION OUTQUEUE(Q) //函数需要一个参数,Q记录类型//Q.FRONT := _________②__________;OUTQUEUE := Q.BASE[Q.FRONT]END;//函数结束//FUNCTION MAXNUMBER(C) //函数需要一个参数,C字符类型//Max := CHR(0);FOR i:=1 to T[C].LENGTH DOCH := T[C].ELEMENT[i];IF _______③________ THENM := MAXNUMBER(CH)ELSEM := CHENDIF;IF MAX < M THENMAX := MENDIF;ENDFOR;___________④____________END; //函数结束//FUNCTION TOTAL(C) //函数需要一个参数,C:字符类型// K := 0;FOR i:= 1 TO T[C].LENGTH DOCH := T[C].ELELMENT[i];IF _________⑤__________ THENM := TOTAL(CH);ELSEM := ORD(CH)-ORD('0');ENDIFK := K + MENDFOR;TOTAL := K;END; //函数结束////主程序//MAX := 36;FOR TABNO := 'A' TO 'Z' DOT[TABNO].LENGTH := 0;ENDFOR;Q.FRONT := 0; Q.REAR := 0;INQUEUE(Q,'L');WHILE (Q.FRONT <>Q .REAR ) DOTABNO := OUTQUEUE(Q);WRITE(TABNO, '=');READLN(S);i := 1;WHILE S[i] <> '(' DOi := i+ 1;ENDWHILE;WHILE S[i] <> ')' DOIF (S[i]>='A') AND (S[i]<='Z') THENS[i]:=CHR(ORD(S[i])+ORD('A')-ORD('a'));IF (S[i]>='A') AND (S[i]<='Z') THENINC(T[TABNO].LENGTH);T[TABNO].ELEMENT[T[TABNO].LENGTH] := S[i];INQUEUE(Q, S[i]);ENDIF;ELSEIF (S[i]>='0') ANDN (S[i]<='9') THENINC(T[TABNO].LENGTH);T[TABNO].ELEMENT[T[TABNO].LENGTH] := S[i]ENDIF;INC(i)ENDIF;ENDWHILE;ENDWHILE;WRITE('The max number in table L is:', maxnumber('L'));WRITE('Total is:', total('L'))END. //主程序结束//<3>设有一个实数,以字符串形式存放于数组x中,用x:array[1..N]of char表示。
其中x[1]若为'-',表示负数;若为'+'、'.'或' ',则表示正数。