end else begin //+,-,*
while prio(code[tc],s[i]) do begin dec(tn);
num[tn]:=⑨ ; dec(tc); end; inc(tc);
⑾ ; end; end; end;
writeln(num[1]:0:0); end.
宁波市第25届中小学计算机程序设计竞赛
初 中 组 初 赛 答 案
1 A 11 C 2 B 12 D
一、单项选择题（每题1.5分，共计30分） 3 4 5 6 7 8 A A D D C A 13 14 15 16 17 18 D C B B C D 9 B 19 A 10 A或C 20 C 二、问题求解（共2题，每题5分，共10分）
1、 13*4*12*6=3744种 2、 第2堆取2枚
三、阅读程序，求程序运行输出结果（共4题，每题8分，共32分）
1、8 14 6 18 2、 69 1000101 14891 6A16
3、27.000 2 1 4、5 2 0 4 6 4
四、程序填空（前5空，每空2分，后6空每空3分，共28分）
① 0..maxn*2 maxn可以是大于等于1000的整数,也可以将maxn*2换以大于等于2000
的整数
② b1[i]+b2[j] 或b2[j]+b1[i]
③ a[k]+a1[i]*a2[j]或次序不同的等价表达式 ④ a[n]:=a[i]
⑤ i
⑥ x:=0______________⑦ inc(tc)或tc:=tc+1或
inc(tc,1)
⑧ code[tc]<>s[i]前后可以有括号⑨
cal(num[tn],num[tn+1],code[tc])
⑩ dec(tc)或tc:=tc+1或dec(tc,1)⑾ code[tc]:=s[i] ____