留下了泪水……
好的思路
#include<stdio.h>
int main(){
int n,x,y
scanf("%d %d %d",&n,&x,&y)
printf("%d",n-(y/x)-1)
return 0
}
代码没有大的计算错误，但是有一+一个问题（另一个同网友所说当y%x==0时，应该输出n-(y/x)才对，改一下就是printf("%d", n-(y/x)+((y%x==0)?0:(-1)))）
而我之前找到的问题是：输入输出问题
样例输入是什么，对应的样例输出又是什么
通常题目会要求你输入输出指定的文件（以便批改），可是你的程序里没有一个fopen
没有有效输入输出同样是问题，
一、 单项选择题 （共10题，每题1.5分，共计15分。每题有且仅有一个正确答案.）。1. 在以下各项中。（ ）不是CPU的组成部分。
A. 控制器 B. 运算器 C. 寄存器 D. ALU E. RAM
2. BIOS（基本输入输出系统）是一组固化在计 ）上一个ROM芯片上的程序。
A. 控制器 B. CPU C. 主板 D. 内存条 E. 硬盘
3. 在下面各世界顶级的奖项中，为计算机科学与技术领域作出杰出贡献的科学家设立的奖项是（）。
A. 沃尔夫奖 B. 诺贝尔奖 C. 菲尔兹奖
D. 图灵奖 E. 南丁格尔奖
4．在编程时（使用任一种高级语言，不一定是C），如果需要从磁盘文件中输入一个很大的二维数组（例
如 1000*1000 的 double 型数组），按行读（即外层循环是关于行的）与按列读（即外层循环是关于
列的）相比，在输入效率上（）。
A. 没有区别 B. 有一些区别，但机器处理速度很快，可忽略不计
C. 按行读的方式要高一些 D. 按列读的方式要高一些 E. 取决于数组的存储方式。
5．在C语言中，表达式21^2的值是（ ）
A. 441 B. 42 C.23 D.24 E.25
6．在C语言中，判断a不等于0且b不等于0的正确的条件表达式是（ ）
A. !a==0 || !b==0 B. !((a==0)&&(b==0)) C. !(a==0&&b==0)
D. a!=0 || b!=0E. a &&b
7．某个车站呈狭长形，宽度只能容下一台车，并且只有一个出入口。已知某时刻该车站状态为空，从
这一时刻开始的出入记录为：“进，出，进，进，进，出，出，进，进 ,出”。假设车辆入站的
顺序为1，2，3，……，则车辆出站的顺序为（ ）。
A. 1, 2, 3, 4, 5 B. 1, 2, 4, 5, 7 C. 1, 4, 3, 7, 6
D. 1, 4, 3, 7, 2 E. 1, 4, 3, 7, 5
8．高度为n的均衡的二叉树是指：如果去掉叶结点及相应的树枝，它应该是高度为n-1的满二叉树。
1
在这里，树高等于叶结点的最大深度，根结点的深度为 0，如果某个均衡的二叉树共有 2381 个结点，
则该树的树高为（ ）。
10
– 1
A. 10 B. 11 C. 12 D. 13 E. 2
9. 与十进制数1770.625 对应的八进制数是（ ）。
A. 3352.5 B. 3350.5 C. 3352.1161
D. 3350.1151 E. 前4个答案都不对
10．将5个数的序列排序，不论原先的顺序如何，最少都可以通过（ ）次比较，完成从小到大的排序。
A. 6 B. 7C. 8 D. 9E. 10
二、 不定项选择题 （共10 题，每题1.5 分，共计15 分。每题正确答案的个数大于或等于1。多选
或少选均不得分）。
11. 设A=B=D=true，C=E=false，以下逻辑运算表达式值为真的有（ ）。 E B. (((A∧B)∨C)∧D∧E)
A. ( A∧B)∨(C∧D)∨
C. A∧(B∨C∨D∨E) D. (A∧(B∨C)) ∧D∧E
+ (32) 的结果是（ ）。
12. (2010)
16 8
B. (202A)
A. (8234)
10 16
D. (2042)
C. (100000000110)
2 16
13. 设栈S的初始状态为空，元素a, b, c, d, e 依次入栈，以下出栈序列不可能出现的有（ ）。
A. a, b, c, e, d B. b, c, a, e, d
C. a, e, c, b, d D. d, c, e, b, a
14. 已知6 个结点的二叉树的先根遍历是1 2 3 4 5 6（数字为结点的编号，以下同），后根遍历是
3 2 5 6 4 1，则该二叉树的可能的中根遍历是（ ）
A. 3 2 1 4 6 5 B. 3 2 1 5 4 6
C. 2 3 1 5 4 6 D. 2 3 1 4 6 5
15. 在下列各数据库系统软件中，以关系型数据库为主体结构的是（ ）。
A. ACCESSB. SQL Server
C. OracleD. Foxpro
16.在下列各软件中，属于NOIP竞赛（复赛）推荐使用的语言环境有（ ）。
A. gcc/g++ B. Turbo Pascal
C. Turbo C D. free pascal
2
17. 以下断电之后将不能保存数据的有（ ）。
A. 硬盘 B. ROM C. 显存 D. RAM
18. 在下列关于计算机语言的说法中，正确的有（ ）。
A. Pascal和C都是编译执行的高级语言
B. 高级语言程序比汇编语言程序更容易从一种计算机移植到另一种计算机上
C. C++是历史上的第一个支持面向对象的计算机
D. 高级语言比汇编语言更高级，是因为它的程序的运行效率更高
19. 在下列关于计算机算法的说法中，正确的有（ ）。
A. 一个正确的算法至少要有一个输入
B. 算法的改进，在很大程度上推动了计算机科学与技术的进步
C. 判断一个算法的好坏，主要依据它在某台计算机上具体实现时的运行时间
D. 目前仍然存在许多涉及到国计民生的重大课题，还没有找到能够在计算机上实施的有效算法
20. 在下列关于青少年信息学竞赛的说法中，你赞成的是（ ）（本题 0分，答题一律满分）。
A. 举行信息学竞赛的目的，是为了带动广大青少年学科学、爱科学，为造就一大批优秀的计算机科学
与技术人才奠定良好的基础
B. 如果竞赛优胜者不能直接保送上大学，我今后就不再参与这项活动了
C. 准备竞赛无非要靠题海战术，为了取得好成绩，就得拼时间、拼体力
D. 为了取得好成绩，不光要看智力因素，还要看非智力因素。优秀选手应该有坚韧不拔的意志，有
严谨求实的作风，既要努力奋进，又要胜不骄败不馁
三．问题求解（共2题，每题5分，共计10分）
1．将2006个人分成若干不相交的子集，每个子集至少有3个人，并且：
（1）在每个子集中，没有人认识该子集的所有人。
（2）同一子集的任何3个人中，至少有2个人互不认识。
（3）对同一子集中任何2个不相识的人，在该子集中恰好只有1个人认识这两个人。
则满足上述条件的子集最多能有___________个？
2．将边长为n 的正三角形每边n 等分，过每个分点分别做另外两边的平行线，得到若干个正三角形，
我们称为小三角形。正三角形的一条通路是一条连续的折线，起点是最上面的一个小三角形，终点是最
下面一行位于中间的小三角形。在通路中，只允许由一个小三角形走到另一个与其有公共边的且位于同
一行或下一行的小三角形，并且每个小三角形不能经过两次或两次以上（图中是 n=5 时一条通路的例
子）。设n=10，则该正三角形的不同的通路的总数为_____________。
3
四．阅读程序写结果（共4题，每题8分，共计32分）
1. #include <stdio.h>
int main()
{int i,u[4],v[4],x,y=10
for(i=0i<=3i++)
scanf("%d", &u)
v[0]=(u[0]+u[1]+u[2]+u[3])/7
v[1]=u[0]/((u[1]-u[2])/u[3])
v[2]=u[0]*u[1]/u[2]*u[3]
v[3]=v[0]*v[1]
x=(v[0]+v[1]+2)-u[(v[3]+3)%4]
if(x>10)
y+= (v[2]*100-v[3])/(u[u[0]%3]*5)
else
y+=20+(v[2]*100-v[3])/(u[v[0]%3]*5)
printf("%d,%d\n", x,y)
return 0
} /*注：本例中，给定的输入数据可以避免分母为0或下标越界。 */
输入：9 3 9 4
输出：_______________
2．#include <stdio.h>
main()
long t
for (i=0i<=4i++)
{t=1
for(j=1j<mj++) t*=2
printf("%ld ",(t*2-1)*t)
}
4
printf("\n")
}
输出:____________________
3．#include "stdio.h"
#define N 7
int fun1(char s[],char a,int n)
{int j
j=n
while(a<s[j] &&j>0) j--
return j
}
int fun2(char s[],char a,int n)
{int j
j=1
while(a>s[j] &&j<=n) j++
return j
}
void main()
{char s[N+1]
int k,p
for(k=1k<=Nk++)
s[k]='A'+2*k+1
p=fun1(s,'M',N)
printf(“%d\n”,p+fun2(s,'M',N))
}
输出：_____________
4.#include <stdio.h>
void digit(long n,long m)
{if(m>0)
printf("%2ld",n%10)
if(m>1)
digit(n/10,m/10)
printf("%2ld",n%10)
}
main()
{long x,x2
5
printf("Input a number:\n") scanf("%ld",&x)
x2=1
while(x2<x) x2*=10
x2/=10
digit(x,x2)
printf("\n")
}
输入：9734526
输出：______________________________
五．完善程序 (前5空，每空2分，后6空，每空3分，共28分)
1．（选排列）下面程序的功能是利用递归方法生成从1到n(n<10)的n个数中取k(1<=k<=n)个数的
全部可能的排列（不一定按升序输出）。例如，当n=3，k=2时，应该输出（每行输出5个排列）：
12 13 21 23 32
31
程序：
#include <stdio.h>
int n,k,a[10]
long count=0
void perm2(int j)
{int i,p,t
if( ① )
{for(i=ki<=ni++)
{count++
t=a[k]a[k]=aa=t
for( ② )
printf("%1d",a[p]) /* "%1d"中是数字1，不是字母l */
printf(" ")
t=a[k]a[k]=aa=t
if(count%5==0) printf("\n")
}
return
}
for(i=ji<=ni++)
{t=a[j]a[j]=aa=t
③
t=a[j] ④
6
}
}
main()
{int i
printf("\nEntry n,k (k<=n):\n")
scanf("%d%d",&n,&k)
for(i=1i<=ni++) a=i
⑤
}
2．（TSP问题的交叉算子）TSP问题(Traveling Salesman Problem)描述如下：给定n个城
市，构成一个完全图，任何两城市之间都有一个代价（例如路程、旅费等），现要构造遍历所有城市的环
路，每个城市恰好经过一次，求使总代价达到最小的一条环路。
遗传算法是求解该问题的一个很有效的近似算法。在该算法中，一个个体为一条环路，其编码方法
之一是1 到n 这n 个数字的一个排列，每个数字为一个城市的编号。例如当n=5 时，“3 4 2 1 5”
表示该方案实施的路线为3->4->2->1->5->3。遗传算法的核心是通过两个个体的交叉 *** 作，产生两
个新的个体。下面的程序给出了最简单的一种交叉算法。具体过程如下：
(1)选定中间一段作为互换段，该段的起止下标为t1，t2，随机生成t1，t2后，互换两段。
(2)互换后，在每个新的排列中可能有重复数字，因而不能作为新个体的编码，一般再做
(2.1) 将两个互换段中，共同的数字标记为0，表示已处理完。
(2.2) 将两个互换段中其余数字标记为1，按顺序将互换段外重复的数字进行替换。
例如：n=12，两个个体分别是：
a1: 1 3 5 4 * 2 6 7 9 * 10 12 8 11
a2: 3 2 1 12 * 6 7 10 11 * 8 5 4 9
t1=5，t2=8。上述每一行中，两个星号间的部分为互换段。假定数组的下标从1开始，互换后有：
a1: 1 3 5 4 * 6 7 10 11 * 10 12 8 11
a2: 3 2 1 12 * 2 6 7 9 * 8 5 4 9
然后，将数字6,7对应的项标记为0，星号内数字2,9,10,11对应的项标记为1，并且按顺序对
应关系为: 10<->2 ，11<->9。于是，将a1[9]=10替换为a1[9]=2，将a2[2]=2替换为a2[2]=10，
类似再做第2组替换。这样处理后，就得到了两个新个体：
a1: 1 3 5 4 6 7 10 11 2 12 8 9
a2: 3 10 1 12 2 6 7 9 8 5 4 11
（3）输出两个新个体的编码。
程序：
#include <stdio.h>
#include <stdlib.h>
#define N 20
int a1[N],a2[N],kz1[N],kz2[N]，n
7
int rand1(int k)
{int t=0
while(t<2|| t>k)
t=(int)((double)rand()/RAND_MAX*k)
return t
}
void read1(int a[],int m)
void wrt1(int a[],int m)
void cross(int a1[], int a2[],int t1, int t2, int n)
{int i,j,k,t,kj
for(i=t1i<=t2i++)
①；
{t=a1
}
for(i=1i<=ni++)
if(i<t1 || i>t2)
kz1=kz2=-1
else
② ；
for(i=t1i<=t2i++)
for(j=t1j<=t2j++)
if(a1==a2[j])
③ break
{
}
for(i=t1i<=t2i++)
if(kz1==1)
{for(j=t1j<=t2j++)
if(kz2[j]==1)
{kj=jbreak
}
for(j=1j<=nj++)
④ )
if(
{a1[j]=a2[kj]break
}
for(j=1j<=nj++)
⑤ )
if(
{a2[j]=a1break
8
}
kz1=kz2[kj]=0
}
}
main()
{int k,t1,t2
printf("input (n>5):\n") scanf("%d",&n)
printf("input array 1 (%d'numbers):\n",n) read1(a1,n)
printf("input array 2 (%d'numbers):\n",n) read1(a2,n)
t1=rand1(n-1)
do
{t2=rand1(n-1)
}while(t1==t2)
if(t1>t2)
{k=t1t1=t2t2=k
}
⑥2
wrt1(a1,n) wrt1(a2,n)
}
希望能有用
第十六届全国青少年信息学奥林匹克联赛初赛试题试题及答案NOIP2010（Pascal提高组）
一、单项选择题
1.与16进制数 A1.2等值的10进制数是 （ ）
A.101.2 B.111.4 C.161.125 D.177.25
2.一个字节（byte）由（）个二进制组成。
A.8 B.16 C.32 D.以上都有可能
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. exe B. com C. dll D. 以上都不是
5.如果在某个进制下等式7*7=41成立，那么在该进制下等式12*12=（ ）也成立。
A. 100 B. 144 C. 164 D. 196
6.提出“存储程序”的计算机工作原理的是（ ）。
A. 克劳德?香农 B. 戈登?摩尔 C. 查尔斯?巴比奇 D. 冯?诺依曼
7.前缀表达式“+ 3 * 2 + 5 12 ” 的值是（ ）。
A. 23 B. 25 C. 37 D. 65
8.主存储器的存取速度比中央处理器(CPU)的工作速度慢的多，从而使得后者的效率受到影响。而根据局部性原理，CPU所访问的存储单元通常都趋于一个较小的连续区域中。于是，为了提高系统整体的执行效率，在CPU中引入了( )。
A. 寄存器 B. 高速缓存 C. 闪存 D. 外存
9.完全二叉树的顺序存储方案，是指将完全二叉树的结点从上到下、从左到右依次存放到一个顺序结构的数组中。假定根结点存放在数组的1号位置上，则第k号结点的父结点如果存在的话，应当存放在数组中的（ ）号位置。
A. 2k B. 2k+1 C. k/2下取整 D. (k+1)/2
10. 以下竞赛活动中历史最悠久的是（ ）。
A. NOIP B. NOI C. IOI D. APIO
二、不定项选择题
1.元素R1、R2、R3、R4、R5入栈的顺序为R1、R2、R3、R4、R5。如果第1个出栈的是R3，那么第5个出栈的可能是( )。
A. R1 B. R2 C.R4 D.R5
2. Pascal语言，C语言和C++语言都属于( )。
A. 高级语言 B. 自然语言 C. 解释性语言 D. 编译性语言
3. 原地排序是指在排序过程中(除了存储待排序元素以外的)辅助空间的大小与数据规模无关的排序算法。以下属于原地排序的有( )。
A. 冒泡排序 B. 插入排序 C. 基数排序 D. 选择排序
4. 在整数的补码表示法中，以下说法正确的是（ ）。
A．只有负整数的编码最高位为1
B．在编码的位数确定后，所能表示的最小整数和最大整数的绝对值相同
C．整数0只有一个唯一的编码
D．两个用补码表示的数相加时，如果在最高位产生进位，则表示运算溢出
5. 一颗二叉树的前序遍历序列是ABCDEFG，后序遍历序列是CBFEGDA，则根结点的左子树的结点个数可能是（ ）。
A．0 B. 2 C. 4 D. 6
6. 在下列HTML语句中，可以正确产生一个指向NOI官方网站的超链接的是（ ）。
A．<a url=”h t t p : / / w w w . n o i . c n”>欢迎访问NOI网站</a>
B．<a href=”h t t p : / / w w w . n o i . c n”>欢迎访问NOI网站</a>
C．<a>h t t p : / / w w w . n o i . c n</a>
D．<a name”h t t p : / / w w w . n o i . c n”>欢迎访问NOI网站</a>
7. 关于拓扑排序，下列说法正确的是( )。
A．所有连通的有向图都可以实现拓扑排序
B．对同一个图而言，拓扑排序的结构是唯一的
C．拓扑排序中入度为0的结点总会排在入度大于0的结点的前面
D．拓扑排序结果序列中的第一个结点一定是入度大于0的点
8. 一个平面的法线是指与该平面垂直的直线。过点(1,1,1)、（0,3,0）、(2,0,0)的平面的法线是（ ）。
A．过点（1，1，1）、（2，3，3）的直线
B．过点（1，1，1）、（3，2，1）的直线
C．过点（0，3，0）、（-3，1，1）的直线
D．过点（2，0，0）、（5，2，1）的直线
9.双向链表中有两个指针域llink和rlink，分别指向该结点的前驱及后继。设p指向链表中的一个结点，他的左右结点均为非空。现要求删除结点p，则下列语句序列中正确的是
()。
A．p->rlink->llink=p->rlink
p->llink->rlink=p->llinkdelete p
B．p->llink->rlink=p->rlink
p->rlink->llink = p->llinkdelete p
C．p->rlink->llink = p->llink
p->rlink->llink ->rlink = p->rlinkdelete p
D．p->llink->rlink = p->rlink
p->llink->rlink->link = p->llinkdelete p
10. 今年(2010年)发生的事件有（ ）。
A．惠普实验室研究员Vinay Deolalikar 自称证明了P≠NP
B．英特尔公司收购计算机安全软件公司迈克菲(McAfee)
C．苹果公司发布iPhone 4手机
D．微软公司发布Windows 7 *** 作系统
三、问题求解
1．LZW编码是一种自适应词典编码。在编码的过程中，开始时只有一部基础构造元素的编码词典，如果在编码的过程中遇到一个新的词条，则该词条及一个新的编码会被追加到词典中，并用于后继信息的编码。
举例说明，考虑一个待编码的信息串：“xyx yy yy xyx”。初始词典只有3个条目，第一个为x,编码为1；第二个为y，编码为2；第三个为空格，编码为3；于是串“xyx”的编码为1-2-1（其中-为编码分隔符），加上后面的一个空格就是1-2-1-3。但由于有了一个空格，我们就知道前面的“xyx”是一个单词，而由于该单词没有在词典中，我们就可以自适应的把这个词条添加到词典里，编码为4，然后按照新的词典对后继信息进行编码，以此类推。于是，最后得到编码：1-2-1-3-2-2-3-5-3-4。
我们可以看到，信息被压缩了。压缩好的信息传递到接受方，接收方也只要根据基础词典就可以完成对该序列的完全恢复。解码过程是编码过程的逆 *** 作。现在已知初始词典的3个条目如上述，接收端收到的编码信息为2-2-1-2-3-1-1-3-4-3-1-2-1-3-5-3-6，则解码后的信息串是”____________”。
2.无向图G有7个顶点，若不存在由奇数条边构成的简单回路，则它至多有__________条边。
3.记T为一队列，初始时为空，现有n个总和不超过32的正整数依次入列。如果无论这些数具体为何值，都能找到一种出队的方式，使得存在某个时刻队列T中的数之和恰好为9，那么n的最小值是___________。
四、阅读程序写结果
1.
const
size = 10
var
i, j, cnt, n, m : integer
data : array[1..size] of integer
begin
readln(n, m)
for i := 1 to n do
read(data[i])
for i := 1 to n do
begin
cnt := 0
for j := 1 to n do
if (data[i] <data[j]) or ((data[j] = data[i]) and (j <i))
then inc(cnt)
if cnt = m
then writeln(data[i])
end
end.
输入
5 2
96 -8 0 16 87
输出：__________
2.
const
size = 100
var
na, nb, i, j, k : integer
a, b : array[1..size] of integer
begin
readln(na)
for i := 1 to na do
read(a[i])
readln(nb)
for i := 1 to nb do
read(b[i])
i := 1
j := 1
while (i <= na) and (j <= nb) do
begin
if a[i] <= b[j] then
begin
write(a[i],' ')
inc(i)
end
else begin
write(b[j], ' ')
inc(j)
end
end
if i <= na then
for k := i to na do
write(a[k], ' ')
if j <= nb then
for k := j to nb do
write(b[k], ' ')
end.
输入
5
1 3 5 7 9
4
2 6 10 14
输出：__________
3.
const
num = 5
var
n: integer
function r(n : integer) : integer
var
i : integer
begin
if n <= num then
begin
r := n
exit
end
for i :=1 to num do
if r(n-i) <0 then
begin
r:=i
exit
end
r:=-1
end
begin
readln(n)
writeln(r(n))
end.
输入 16
输出：__________
4.
const
size=100
var
n,m,x,y,i :integer
r: array[1.. size] of integer
map : array[1..size, 1..size] of boolean
found : boolean
function successful : boolean
var
i : integer
begin
for i :=1 to n do
if not map[r[i]][r[i mod n + 1]]
then begin
successful := false
exit
end
successful :=true
end
procedure swap(var a, b : integer)
var
t : integer
begin
t := a
a := b
b := t
end
procedure perm(left, right : integer)
var
i : integer
begin
if found
then exit
if left >right
then begin
if successful
then begin
for i := 1 to n do
writeln(r[i], ' ')
found := true
end
exit
end
for i:= left to right do
begin
swap(r[left], r[i])
perm(left + 1, right)
swap(r[left], r[i])
end
end
begin
readln(n, m)
fillchar(map, sizeof(map), false)
for i := 1 to m do
begin
readln(x, y)
map[x][y] := true
map[y][x] := true
end
for i := 1 to n do
r[i] := i
found := false
perm(1, n)
if not found
then writeln('No soloution')
end.
输入:
9 12
1 2
2 3
3 4
4 5
5 6
6 1
1 7
2 7
3 8
4 8
5 9
6 9
输出：__________
五、完善程序
1.(过河问题) 在一个月黑风高的夜晚,有一群人在河的右岸,想通过唯一的一根独木桥走到河的左岸.在伸手不见五指的黑夜里,过桥时必须借照灯光来照明,不幸的是,他们只有一盏灯.另外,独木桥上最多能承受两个人同时经过,否则将会坍塌.每个人单独过独木桥都需要一定的时间,不同的人要的时间可能不同.两个人一起过独木桥时,由于只有一盏灯,所以需要的时间是较慢的那个人单独过桥所花费的时间.现在输入N(2<=N<1000)和这N个人单独过桥需要的时间,请计算总共最少需要多少时间,他们才能全部到达河左岸.
例如,有3个人甲、乙、丙,他们单独过桥的时间分别为1 2 4,则总共最少需要的时间为7.具体方法是:甲 乙一起过桥到河的左岸,甲单独回到河的右岸将灯带回,然后甲,丙在一起过桥到河的左岸,总时间为2+1+4=7.
const
SIZE = 100
INFINITY = 10000
LEFT = true
RIGHT = false
LEFT_TO_RIGHT = true
RIGHT_TO_LEFT = false
var
n, i : integer
time : array[1..Size] of integer
pos :array[1..Size] of Boolean
function max(a, b :integer) : integer
begin
if a >b then
max := a
else
max := b
end
function go(stage : boolean) : integer
var
i, j, num, tmp, ans : integer
begin
if (stage = RIGHT_TO_LEFT)
then begin
num := 0
ans :=0
for i := 1 to n do
if pos[i] = Rignt then
begin
inc(num)
if time[i] >ans then
ans := time[i]
end
if __________ then
begin
go := ans
exit
end
ans := INFINITY
for i := 1 to n – 1 do
if pos[i] = RIGHT then
for j := i+1 to n do
if pos[j] = RIGHT then
begin
pos[i] := LEFT
pos[j] := LEFT
tmp := max(time[i], time[j]) + _______
if tmp <ans then
ans := tmp
pos[i] := RIGHT
pos[j] := RIGHT
end
go := ans
end
else if (stage = LEFT_TO_RIGHT)
then begin
ans := INFINITY
for i := 1 to n do
if _______ then
begin
pos[i] := RIGHT
tmp := ________
if tmp <ans then
ans := tmp
_________
end
go := ans
end
else go := 0
end
begin
readln(n)
for i := 1 to n do
begin
read(time[i])
pos[i] := RIGHT
end
writeln(go(RIGHT_TO_LEFT))
end.
NOIP2010提高组（Pascal语言）参考答案与评分标准
一、单项选择题（共10题，每题1.5分，共计15分）
1 2 3 4 5 6 7 8 9 10
C A A D B D C B C B
二、不定项选择题（共10题，每题1.5分，共计15分，多选或少选均不得分）
1 2 3 4 5 6 7 8 9 10
ACD AD ABD AC B B D D BCD ABC
三、问题求解（共3题，每题5分，共计15分）
1．yyxy xx yyxy xyx xx xyx
2．12
3．18
四、阅读程序写结果（共4题，每题7分，共计28分）
1．16
2．1 2 3 5 6 7 9 10 14
3．4
4．1 6 9 5 4 8 3 2 7
五、完善程序（第1空2分，其余10空，每空2.5分，共计27分）
（说明：以下各程序填空可能还有一些等价的写法，各省可请本省专家审定和上机验证，不一定上报科学委员会审查）
1．① num <= 2（或num <3 或num = 2）
② go(LEFT_TO_RIGHT)
③ pos[i] = LEFT（或LEFT = pos[i]）
④ time[i] + go(RIGHT_TO_LEFT)（或go(RIGHT_TO_LEFT) + time[i]）
⑤ pos[i] := LEFT
本小题中，LEFT可用true代替，LEFT_TO_RIGHT可用true代替，RIGHT_TO_LEFT可用false代替。
2．① opt[k]
② home[r] := k
③ j := i + i（或j := 2 * i 或j := i * 2）
④ swap(i, j)（或swap(j, i)）
⑤ value[i] + heap[1]（或heap[1] + value[i]）
⑥ i - m
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）