考试 子程序设计1

考试子程序设计
参见：/question/127711340.html
1、实验目的
掌握CALL指令的使用方法。

掌握子程序设计、编写、调试和运行的方法。

2、实验内容
（1）显示学生名次表
要求：接收从键盘输入的—个班的学生成绩，并存放于50字的grade数组中，其中grade+i保存学号为i+1的学生的成绩。

然后根据grade中的学生成绩，把学生名次填人50字的rank数组中，其中rank+i的内容是学号为i+1学生的名次。

再按学号顺序把名次从终端上显示出来。

分析：子程序划分的层次图如附图7所示。

可以看出，其中main为主控模块，其下—
层的三个模块为程序的三大部分。

现将各模块说
明表示如下：
1) 模块名：main为总控模块
输入：从键盘输入—个班的学生成绩。

输出：显示—个班的学生名次。

功能：根据输入的学生成绩，计算并显示学
生名次。

算法如下：
—个学生的名次等于成绩高于该生的学生
人数加1。

2) 模块名：input
输入：以学号为序从键盘输入—个班的学生成绩。

各个成绩之间用逗号隔开，最后以‘回车’符结束。

输出：把—个班的学生成绩存人grade数组。

功能：接收—个班的学生成绩。

调用子模块decibin把从键盘输入的—个十进制数转换为二进制数。

调用子模块crlf完成回车、换行功能。

3) 模块名：rankp
输入：从grade数组取得—个班的学生成绩。

输出：以学号为序计算出该班每个学生的名次存人rank数组。

功能：计算—个班的学生名次。

算法为：—个学生的名次等于成绩高于该生的学生人数加1。

4) 模块名：output
输入：从rank数组取得—个班的学生名次。

输出：把—个班的学生名次以学号为序在终端上显示出来。

功能：显示—个班的学生名次。

调用子模块binidec，以便把rank数组中的二进制数转换为十进制数并在终端上显示出来。

调用于模块crlf完成回车、换行功能。

5) 模块名：decibin；
输入：从键盘取得—个十进制数。

”
输出：把该数转换为二进制数并存人BX寄存器中。

功能：把从键盘取得的—个十进制数转换为二进制数，并将该数存入BX寄存器中。

6) 模块名：crlf
输出：向终端发出回车、换行符。

功能：完成—次回车、换行操作。

7) 模块名：binidec
输入：从BX寄存器取得—个二进制数。

输出：在终端屏幕上显示—个十进制数。

功能：把BX寄存器中的二进制数转换为十进制数，并在终端屏幕上显示出来。

调用子模块dec_div用来作除法运算并显示字符。

8) 模块名：dec_div
输入：从BX寄存器中取得需转换为十进制的数。

输出：在屏幕上显示—位十进制数。

功能：把BX寄存器中的二进制数除以相应的十的幂，并在屏幕上显示—位商，余数保存在BX寄存器中。

有了以上的层次图及模块说明，对程序的全貌就有了基本了解。

在附图8中，我们给出了除rankp以外的其余各子程序的程序流程图。

数据段可定义如下：
DATAREA SEGMENT
GRADE DW 50 DUP (?)
RANK DW 50 DUP (?)
COUNT DW 7
MESS1 DB ‘Grade?$’
MESS2 DB 13，10，‘Input Error!’，13，10，‘$’
MESS3 DB ‘Rank：$’
DATAREA ENDS
子程序RANKP可参考如下程序RANKP PROC NEAR
MOV DI，COUNT
MOV BX，0
LOOPl：MOV AX，GRADE[BX]
MOV WORD PTR RANK[BX]，0
MOV CX，COUNT
LEA SI，GRADE
NEXT：CMPAX，[SI]
JG NO_COUNT
INCWORD PTR RANK[BX]
NO_COUNT：ADDSI，2
LOOP NEXT
ADD BX，2
DEC DI
JNE LOOPl
RET
RANKP ENDP
子程序BINIDEC可参考如下程序BINIDEC PROC NEAR
PUSH BX
PUSH CX
PUSH SI
PUSH DI
MOV CX，100D
CALL DEC_DIV
MOV CX，10D
CALL DEC_DIV
MOV CX，1D
CALL DEC_DIV
POP DI
POP SI
POP CX
POP BX
RET
BINIDEC ENDP
DEC_DIV PROC NEAR
……….
DEC_DIV ENDP
3、实验步骤
完善程序后按步骤进行操作。