od102ssjENDwritel
END
第3页参考答案竞赛后将在宁波市计算机学会网站www
bcaiorg上公布共8页
f宁波市第23届中小学生计算机程序设计竞赛初赛试题高中组
END程序运行的结果是：2．PROGRAMp2CONSTmax
100VARik
LONGINTarARRAY0max
OFLONGINTBEGINwriteI
put
readl
a1
r10k1REPEATIFrk0THENBEGINFORi1TOkDOwriteaiwritel
WHILEk0ANDak1DOkk1akak1rkrk1ENDELSEBEGINIFrkakTHENak1rkELSEak1akrk1rkak1kk1ENDUNTILk0END输入：4程序运行的结果是：3．PROGRAMp3VARij
mxINTEGERfdBOOLEANabARRAY1100ofINTEGERPROCEDUREi
it
第4页参考答案竞赛后将在宁波市计算机学会网站www
bcaiorg上公布共8页
f宁波市第23届中小学生计算机程序设计竞赛初赛试题高中组
VARijINTEGERBEGINwriteI
put
readl
writeI
putmreadl
mIF
1THENBEGINwritel
I
puterrorhaltENDwriteI
put
3DataFORi1TO
DOreadaireadl
ENDi
itBEGINMAINi
iti1fdFALSEWHILENOTfdANDiNDOBEGINbi1j1WHILEj
DOBEGINIFijANDaiajTHENbibi1jj1ENDIFbimTHENBEGINwritel
aiaifdTRUEENDii1ENDEND输入：I
put
10I
putm3I
put10Data1657201938416132532程序运行的结果是：4．PROGRAMp4TYPELINKLISTITEMITEMRECORDdataINTEGER
extLINKLIST
第5页参考答案竞赛后将在宁波市计算机学会网站www
bcaiorg上公布共8页
f宁波市第23届中小学生计算机程序设计竞赛初赛试题高中组
ENDVARheadtemptailLINKLISTiINTEGERBEGINwritel
‘INPUTDATA0TOEND’headNILreadiWHILEi0DOBEGIN
ewtempWITHtempDOBEGINdataii
extNILENDIFheadNILTHENBEGINheadtemptailtempENDELSEBEGINtail
exttemptailtempENDreadiENDreadl
writel
writel
‘THELISTIS’tempheadWHILEtempNILDOBEGINwritetempdata4temptemp
extENDEND输入：123450程序运行的结果是：
第6页参考答案竞赛后将在宁波市计算机学会网站www
bcaiorg上公布共8页
f宁波市第23届中小学生计算机程序设计竞赛初赛试题高中组
四、程序填空每空2分，共28分程序填空每空
请阅读下列各题的题意及程序，并将程序的空缺部分填空完善，请阅读下列各题的题意及程序，并将程序的空缺部分填空完善，填空的内容写在答题卷相应位置上，答在试卷上不得分。相应位置上，答在试卷上不得分。1．问题描述：．问题描述：由二叉树的前序遍历和中序遍历两个遍历序列能唯一确定一棵二叉树。前序遍历为：访问根结点、访问左子树、r