第五次作业(共8页).doc

《第五次作业(共8页).doc》由会员分享，可在线阅读，更多相关《第五次作业(共8页).doc（8页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、精选优质文档-倾情为你奉上1、 下面的程序段有错吗？若有，请指出错误。CRAYPROCPUSHAXADDAX, BXRETENDPCRAY2、 已知堆栈寄存器SS的内容是0F0A0H，堆栈指示器SP的内容是00B0H，先执行两条把8057H和0F79BH分别入栈的PUSH指令，然后执行一条POP指令。试画出示意图说明堆栈及SP内容的变化过程。3、 写一段子程序SKIPLINES，完成输出空行的功能。空出的行数在AX寄存器中。答：程序如下：CSEGSEGMENTSKIPLINESPROCFARASSUME CS: CSEGBEGIN:PUSHCXPUSHDXMOVCX, AXDISP:MOVDL

2、, 0DH；MOVAH, 2； INT21HMOVDL, 0AHMOVAH, 2；显示一个字符的DOS调用INT21HLOOPDISPPOPDXPOPCXRETSKIPLINESENDPEND4、 设有10个学生的成绩分别是76，69，84，90，73，88，99，63，100和80分。试编制一个子程序统计6069分，7079分，8089分，9099分和100分的人数，分别存放到S6，S7，S8，S9和S10单元中。答：程序如下：DSEGSEGMENTRECORDDW 76，69，84，90，73，88，99，63，100，80S6DW 0S7DW 0S8DW 0S9DW 0S10DW 0DS

3、EGENDS；*CSEGSEGMENTMAINPROCFARASSUME CS: CSEG, DS: DSEGSTART:PUSHDS；设置返回DOSSUBAX, AXPUSHAXMOVAX, DSEGMOVDS, AX； BEGIN:MOVCX, 10CALLCOUNT；后续程序RETMAINENDP；-COUNTPROCNEAR；成绩统计子程序MOVSI, 0NEXT:MOVAX, RECORDSIMOVBX, 10； DIVBL；计算公式为：(成绩)/10-6)*2送(BX)MOVBL, AL； SUBBX, 6；应为只统计60分以上成绩SALBX, 1；(BX)*2INCS6BX；S6

4、是S6，S7，S8，S9和S10单元的首地址ADDSI, 2LOOPNEXTRETCOUNTENDP；COUNT子程序结束；-CSEGENDS；以上定义代码段；*ENDSTART5、 编写一个有主程序和子程序结构的程序模块。子程序的参数是一个N字节数组的首地址TABLE，数N及字符CHAR。要求在N字节数组中查找字符CHAR，并记录该字符出现的次数。主程序则要求从键盘接收一串字符以建立字节数组TABLE，并逐个显示从键盘输入的每个字符CHAR以及它在TABLE数组中出现的次数。(为简化起见，假设出现次数15，可以用16进制形式把它显示出来。)答：程序如下：DSEGSEGMENTTABLEDB

5、255 DUP (?)NDW 255CHARDB ?CHAR_NDB 0； CRLFDB 0DH, 0AH, $DSEGENDS；*STACKSEGMENTDW 100 DUP (?)TOSLABELWORDSTACKENDS；以上定义堆栈段；*CSEGSEGMENTMAINPROCFARASSUME CS: CSEG, DS: DSEG, SS: STACKSTART:MOVAX, STACKMOVSS, AX； MOVSP, OFFSET TOS；PUSHDS；SUBAX, AXPUSHAXMOVAX, DSEGMOVDS, AX；BEGIN:MOVBX,0MOVCX, 255；INPUT

6、:MOVAH, 1；INT21HCMPAL, 0DH；JZIN_NMOVTABLE BX, ALINCBXLOOPINPUTIN_N:MOVN, BX；TABLE数组中的字符个数送NCALLDISP_CRLFIN_CHAR:MOVAH, 1； INT21HCMPAL, 0DH； JZEXITMOVCHAR, AL；CALLSEARCH； MOVDL, :；MOVAH, 2； INT21HMOVDL, CHAR_N；ANDDL, 0FHADDDL, 30HCMPDL, 39HJBENEXTADDDL, 07H；是AFNEXT:MOVAH, 2； INT21HCALLDISP_CRLFJMPSHO

7、RT IN_CHAREXIT:RETMAINENDP；-SEARCHPROCNEAR； MOVSI, 0MOVCX, NMOVCHAR_N, 0MOVAL, CHARROTATE:CMPAL, TABLE SIJNZROTATE1INCCHAR_N；ROTATE1:INCSILOOPROTATERETSEARCHENDP； ；-DISP_CRLFPROCNEAR； LEADX, CRLFMOVAH, 09HINT21HRETDISP_CRLFENDP； ；-CSEGENDS； ；*ENDSTART6、 编写子程序嵌套结构的程序，把整数分别用二进制和八进制形式显示出来。主程序BANDO：把整数字

8、变量VAL1存入堆栈，并调用子程序PAIRS；子程序PAIRS：从堆栈中取出VAL1；调用二进制显示程序OUTBIN显示出与其等效的二进制数；输出8个空格；调用八进制显示程序OUTOCT显示出与其等效的八进制数；调用输出回车及换行符子程序。答：程序如下：DSEGSEGMENTVAL1DW ?CRLFDB 0DH, 0AH, $DSEGENDS；以上定义数据段；*CSEGSEGMENTBANDOPROCFAR；ASSUME CS: CSEG, DS: DSEGSTART:PUSHDS；SUBAX, AXPUSHAXMOVAX, DSEGMOVDS, AX；给DS赋值PUSHVAL1CALLPAI

9、RSRETBANDOENDP；-PAIRSPROCNEAR；PAIRS子程序PUSHBPMOVBP, SPPUSHBXMOVBX, BP+4；从堆栈中取出VAL1CALLOUTBIN； MOVCX, 8；显示8个空格符SPACE:MOVDL, MOVAH, 2INT21HLOOPSPACECALLOUTOCT； CALLDISP_CRLFPOPBXPOPBPRET2PAIRSENDP；PAIRS子程序结束；-OUTBINPROCNEAR；PUSHBXMOVCX, 16ONEBIT:ROLBX, 1MOVDX, BXANDDX, 1ORDL, 30H；转换为ASCII码MOVAH, 2INT21

10、HLOOPONEBITPOPBXRETOUTBINENDP；OUTBIN子程序结束；-OUTOCTPROCNEAR；八进制显示子程序ROLBX, 1；16位二进制数包含6位八进制数,最高位仅1位MOVDX, BXANDDX, 1ORDL, 30H；转换为ASCII码MOVAH, 2INT21HMOVCX, 5；余下还有5位八进制数NEXT:PUSHCXMOVCL, 3； ROLBX, CLMOVDX, BXANDDX, 07HORDL, 30H； MOVAH, 2INT21HPOPCXLOOPNEXTRETOUTOCTENDP；OUTOCT子程序结束；-DISP_CRLFPROCNEAR；显示

11、回车换行符子程序LEADX, CRLFMOVAH, 09HINT21HRETDISP_CRLFENDP；DISP_CRLF子程序结束；-CSEGENDS；以上定义代码段；*ENDSTART7、 主程序CALLMUL定义堆栈段、数据段和代码段，并把段寄存器初始化，数据段中定义变量QTY和PRICE；代码段中将PRICE装入AX，QTY装入BX，然后调用子程序SUBMUL。程序SUBMUL没有定义任何数据，它只简单地把AX中的内容(PRICE)乘以BX中的内容(QTY)，乘积放在DX: AX中。请编制这两个要连接起来的程序。答：程序如下：TITLECALLMUL；主程序EXTRNSUBMUL: F

12、AR；-STACKSEGMENT PARA STACK STACKDW 64 DUP (?)TOSLABELWORDSTACKENDS；-DATASGSEGMENT PARA DATAQTYDW 0140HPRICEDW 2500HDATASGENDS；-CODESGSEGMENT PARA CODECALLMULPROCFARASSUME CS: CODESG, DS: DATASG, SS: STACKSTART:MOVAX, STACKMOVSS, AX；给SS赋值MOVSP, OFFSET TOS； PUSHDSSUBAX, AXPOPAXMOVAX, DATASGMOVDS, AXM

13、OVAX, PRICEMOVBX, QTYCALLSUBMULRETCALLMULENDPCODESGENDS；-ENDCALLMUL；*TITLESUBMUL；子程序PUBLICSUBMUL；-CODESG1SEGMENT PARA CODEASSUME CS: CODESG1SUBMULPROCFARASSUME CS: CODESG1MULBXRETSUBMULENDPCODESG1ENDS；-END8、 试编写一个执行以下计算的子程序COMPUTE：R X + Y - 3其中X，Y及R均为字数组。假设COMPUTE与其调用程序都在同一代码段中，数据段D_SEG中包含X和Y数组，数据段E

14、_SEG中包含R数组，写出主程序调用COMPUTE过程的部分。答：TITLEADDITION；主程序；-D_SEGSEGMENT PARA DATACOUNTEQU 10HXDW COUNT DUP (?)YDW COUNT DUP (?)D_SEGENDS；-E_SEGSEGMENT PARA DATARDW COUNT DUP (?)E_SEGENDS；-C_SEGSEGMENT PARA CODEADDITIONPROCFARASSUME CS: C_SEG, DS: D_SEG, ES: E_SEGSTART:PUSHDSSUBAX, AXPUSHAXMOVAX, D_SEGMOVDS, AXMOVAX, E_SEGMOVES, AXCALLCOMPUTE；调用求和子程序RETADDITIONENDP；*COMPUTEPROCNEAR； MOVCX, COUNTMOVBX, 0REPEAT:MOVAX, XBXADDAX, YBXSUBAX, 3MOVES: RBX, AXRETCOMPUTEENDP；-C_SEGENDS；*ENDSTART专心-专注-专业