noip2008提高组初赛c语言试题,NOIP2008初赛答案（提高组Pascal语言）

NOIP2008年提高组(Pascal语言)参考答案与评分标准

一、单项选择题：(每题1.5分)

1.

C 2.

A 3.

B 4.

C 5. B

6.

D 7.

D 8.

E 9.

B 10. C

二、 不定项选择题 (共10题，每题1.5分，共计15分。每题正确答案的个数大于或等于1。多选或少选均不得分)。

11. ABD 12.

AC 13. BC 14.

B 15. ABC

16. ABD 17.

BCD 18.

ABC 19.

ACD 20. ABCD

三、问题求解：(共2题，每题5分，共计10分)

1．7

2．3060

四、阅读程序写结果(共4题，每题8分，共计32分)

1. 23 (信心题)

2. 1,3,2 (简单递归)

3. 132/213/231/312/321/ (全排列)

4. defghijxyzabc/hfizxjaybcccc (字符串替换)

五．完善程序 (前6空，每空3分，后5空，每空2分，共28分)

(说明：以下各程序填空可能还有一些等价的写法，各省可请本省专家审定和上机验证，不一定上报科学委员会审查)

1. ①

a[left]

② a[j] < value (或a[j]

<= value)

③ a[i] > value (或a[i]

>= value)

④ a[i] := value;

⑤ i,right,n

⑥ FindKth(left, i, n)

2. ① inc(j);

(或者j := j+1;)

② a[i,j] > k

③ a[i,j] < k

④ answerx := i;

⑤ answery := j;