2006NOIP普及组试题

Posted 2023-04-11

12．在 Pascal 语言中，判断 a 不等于 0 且 b 不等于 0 的正确的条件表达式是（ ）
A. not a=0 or not b=0 B. not((a=0)and(b=0)) C. not(a=0 and b=0) D. (a<>0)and (b<>0)
请高手说明解题过程!

17. 设A=B=D=true，C=false，以下逻辑运算表达式值为真的有（ ）。

A. (¬ A∧B)∨(C∧D) B.¬ ((A∨B∨D)∧C)

C. ¬ A∧(B∨C∨D) D. (A∧B∧C)∨ ¬ D

¬ ∨ ∧ 各是什么意思?

第一个是D是显然的,(不知道有没有陷阱).
第二个是B. A,B,D都为真故(A∨B∨D)为真,C为假,故
((A∨B∨D)∧C) 为假,故B选项为真.

第一是非,就是A为真的话¬A为假,反之成立.
第二是或,就是A,B中有一个为真,则A∨B为真.
第三是与,就是A,B中有一个为假,则A∧B为假.

书上好像都有.不会是在刷分吧.... 参考技术A 12题选择D
17题选择B
非 与 或 参考技术B ¬是NOT
∨是OR
∧是AND

noip2006普及组pascal试题解答

普及组（Pascal 语言）参考答案与评分标准

一、单项选择题：（每题 1.5 分）由OIFans.cn收集
1. D 2. B 3. B 4. C 5. B 6.B 7. C 8. A 9. D 10. D

11. C 12. D 13. C 14. B 15. C 16. B 17. B 18. A 19. C 20. B

二、问题求解：（每题 5 分）

1． 4 次 (1 分)，
第一步：分成 3 组：27，27，26，将前 2 组放到天平上（4 分）。

2．有获胜策略(1 分)，第 1 次在第 5 堆中取 32 颗石子(4 分)，。

三、阅读程序写结果

1. 10，10 （对 1 个数给 4 分，无逗号扣 1 分）

2. 6 28 496 8128 33550336

（前 2 个对 1 个数给 1 分，后 3 个对 1 个数给 2 分）

3. 5

4. 6 2 5 4 3 7 9 9 7 3 4 5 2 6（数字之间无空格扣 2 分）

四、完善程序(前 4 空（①--④），每空 2.5 分，后 6 空（⑤--⑩），每空 3 分)

1．① k=n （或 n=k）

② count mod 5=0

③ perm(k+1)由OIFans.cn收集

④ a[k]:=a[j];a[j]:=t

⑤ perm(1)

2．⑥ break

⑦ t mod 50=0

⑧ a-p*b（或 a-b*p）

⑨ c*10+1 （或 10*c+1）

⑩ n

参考资料：http://www.oifans.cn/docs/noip2006/06ppans/noip2006.htm

参考技术A #include <fstream>
#include <string.h>
using namespace std;
ifstream fin("machine.in");
ofstream fout("machine.out");
const int maxn = 100+5;
int n, m, g[maxn][maxn];
int link[maxn], used[maxn];

int path(int i)

if (used[i]) return 0;
used[i] = 1;
int j;
for (j = 1; j <= m; j++) if (g[i][j])
if (!link[j] || path(link[j]))

link[j] = i;
return 1;

return 0;


main()

int i, j, k;
fin >> n >> m >> k;
memset(g, 0, sizeof(g));
for (i = 0; i < k; i++)

int temp, x, y;
fin >> temp >> x >> y;
if (x && y) g[x][y] = 1;


memset(link, 0, sizeof(link));
memset(used, 0, sizeof(used));

for (i = 1; i <= n; i++) if (path(i)) memset(used, 0, sizeof(used));
int tot = 0;
for (i = 1; i <= m; i++) if (link[i]) tot++;
fout << tot << endl;
return 0;