1、三级 PC技术机试-198 及答案解析(总分：100.00，做题时间：90 分钟)一、上机题(总题数：1，分数：100.00)1.请编制程序，其功能是：将一个字符串中连续相同的字符仅用一个字符代替，生成一个新的字符串。字符串以 00H结束，长度不超过 20个字节。例如：原字符串为：41H,41H,41H,42H,31H,31H,.,00H(AAAB11)新字符串为：41H,42H,31H,.,00H(AB1)部分程序已给出，其中原始数据由过程 LOAD从文件 INPUT1.DAT中读入 SOURCE开始的内存单元中，运算结果要求从 RESULT开始存放，由过程 SAVE保存到文件 OUTPUT
2、1.DAT中。请填空 BEGIN和 END之间已给出的源程序使其完整，空白已用横线标出，每个空白一般只需一条指令，但采用功能相当的多条指令亦可，或删除 BEGIN和 END之间原有的代码并自行编程来完成所要求的功能。对程序必须进行汇编，并与 IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。试题程序EXTRN LOAD:FAR,SAVE:FARLEN EQU 20DSEG SEGMENTSOURCE DB LEN DUP(?)RESULT DB LEN DUP(0)NAME0 DB INPUT1.DAT,0NAME1 DB OUTPUT1.D
3、AT,0DSEG ENDSSSEG SEGMENT STACKDW 256 DUP(?)SSEG ENDSCSEG SEGMENTASSUME CS:CSEG,SS:SSEG,DS:DSEGSTART PROC FARPUSH DSXOR AX,AXPUSH AXMOV AX,DSEGMOV DS,AXLEA DX,SOURCELEA SI,NAME0MOV CX,LENCALL LOAD ;LOAD STRING FROM FILE; *BEGIN*;在 BEGIN和 END之间补充代码; *END*LEA DX,RESULTLEA SI,NAME1CALL SAVE ;SAVE RESUL
4、T TO FILERETSTART ENDPCSEG ENDSEND START（分数：100.00）_三级 PC技术机试-198 答案解析(总分：100.00，做题时间：90 分钟)一、上机题(总题数：1，分数：100.00)1.请编制程序，其功能是：将一个字符串中连续相同的字符仅用一个字符代替，生成一个新的字符串。字符串以 00H结束，长度不超过 20个字节。例如：原字符串为：41H,41H,41H,42H,31H,31H,.,00H(AAAB11)新字符串为：41H,42H,31H,.,00H(AB1)部分程序已给出，其中原始数据由过程 LOAD从文件 INPUT1.DAT中读入 SOU
5、RCE开始的内存单元中，运算结果要求从 RESULT开始存放，由过程 SAVE保存到文件 OUTPUT1.DAT中。请填空 BEGIN和 END之间已给出的源程序使其完整，空白已用横线标出，每个空白一般只需一条指令，但采用功能相当的多条指令亦可，或删除 BEGIN和 END之间原有的代码并自行编程来完成所要求的功能。对程序必须进行汇编，并与 IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。试题程序EXTRN LOAD:FAR,SAVE:FARLEN EQU 20DSEG SEGMENTSOURCE DB LEN DUP(?)RESULT D
6、B LEN DUP(0)NAME0 DB INPUT1.DAT,0NAME1 DB OUTPUT1.DAT,0DSEG ENDSSSEG SEGMENT STACKDW 256 DUP(?)SSEG ENDSCSEG SEGMENTASSUME CS:CSEG,SS:SSEG,DS:DSEGSTART PROC FARPUSH DSXOR AX,AXPUSH AXMOV AX,DSEGMOV DS,AXLEA DX,SOURCELEA SI,NAME0MOV CX,LENCALL LOAD ;LOAD STRING FROM FILE; *BEGIN*;在 BEGIN和 END之间补充代码; *END*LEA DX,RESULTLEA SI,NAME1CALL SAVE ;SAVE RESULT TO FILERETSTART ENDPCSEG ENDSEND START（分数：100.00）_正确答案：(LEA SI,SOURCELEA DI,RESULTLOOP1: MOV AL,SICMP AL.00HJE EXITNEXT: INC SIMOV AH,SICMP AL,AHJE NEXTMOV DI,ALINC DIJMP LOOP1EXIT: MOV DI,AL)解析：
