循環(huán)程序設計實驗報告-文少軒(共9頁)

1、精選優(yōu)質文檔-傾情為你奉上循環(huán)程序設計實驗報告西安交通大學文少軒一、 實驗目的1. 掌握循環(huán)程序設計方法；2. 掌握數據的統(tǒng)計和排序方法。二、 實驗設備IBM-PC 微型計算機 一臺三、 實驗要求1. 復習比較指令、循環(huán)控制指令的用法；2. 根據流程圖和編程提示，預先編寫匯編語言程序；3. 有興趣的同學請編寫出實驗習題中的程序四、 實驗內容及數據記錄1. 在屏幕上顯示提示信息“Please input 10 numbers:”，提示用戶輸入10個數（數的范圍在099之間），然后從鍵盤上讀入這10個數。接著對這10個數從小到大進行排序，并統(tǒng)計059、6079、8099的數各有多少。最后在屏幕上顯

2、示排序后的數（每個數之間用逗號分隔）并顯示統(tǒng)計的結果。顯示格式如下：Sorted numbers:xx,xx,xx,xx,xx,xx,xx,xx,xx,xx059:xx6079:xx8099:xx程序設計：CALLDOSMACRO FUNCTIONMOV AH,FUNCTIONINT 21HENDMCRLFMACROMOV DL,0DHCALLDOS 2MOV DL,0AHCALLDOS 2ENDMDATASEGMENT;提示信息字符串MESSAGEDB 'Please input 10 nums:',0DH,0AH,'$'鍵盤緩沖區(qū)KB_BUFDB 3ACTL

3、ENDB ?BUFFERDB 3 DUP(?);數據及統(tǒng)計結果NUMBERSDB 10 DUP(?);鍵入的數據轉換成二進制后放在此處LE59DB 0;059的個數GE60DB 0;6079的個數GE80DB 0;8099的個數;顯示結果的字符串SORTSTRDB 'Sorted numbers:'SORTNUMDB 10 DUP(20H,20H,','),0DH,0AHMESS00DB ' 0-59:',30H,30H,0DH,0AHMESS60DB '60-79:',30H,30H,0DH,0AHMESS80DB '8

4、0-99:',30H,30H,0DH,0AH,'$'DATAENDS;CODESEGMENTASSUMECS:CODE,DS:DATASTART:MOV AX,DATAMOV DS,AX;顯示MESSAGE提示信息LEA DX,MESSAGECALLDOS 9MOV CX,10;共讀入10個數據LEA DI,NUMBERS;設置數據保存區(qū)指針L1:LEA DX,KB_BUFCALLDOS 10;將ASCII碼形式的兩位的十進制數轉換成二進制數MOV AH,BUFFERMOV AL,BUFFER+1CMP AL,0DHJNZ L2MOV AL,AHMOV AH,'

5、0'L2:SUB AL,30HSUB AH,30HSHL AH,1MOV BL,AHSHL AH,1SHL AH,1ADD AH,BLADD AL,AHMOV DI,ALINC DICRLFLOOP L1;對NUMBERS中的10個數據進行排序LEA SI,NUMBERSMOV BL,9;設置外循環(huán)次數NEXT1:MOV DI,SIMOV CL,BL;設置內循環(huán)次數;內循環(huán)開始NEXT2:MOV AL,SIINC DICMP AL,DIJB NEXT3MOV DL,DIMOV SI,DLMOV DI,ALNEXT3:LOOP NEXT2;內循環(huán)結束INC SIDEC BLJNZ NEX

6、T1;對NUMBERS中的10個數據進行統(tǒng)計LEA SI,NUMBERSMOV CL,10GRADE1:CMP BYTE PTRSI,60JNB GRADE2INC LE59JMP L3GRADE2:CMP BYTE PTRSI,80JNB GRADE3INC GE60JMP L3GRADE3:INC GE80L3:INC SILOOP GRADE1;把10個數據轉換成ASCII碼LEA SI,NUMBERSLEA DI,SORTNUMMOV CL,10L4:MOV AL,SIMOV AH,0MOV BL,10DIV BLADD AH,30HADD AL,30HMOV DI,ALINC DIM

7、OV DI,AHADD DI,2INC SILOOP L4;把統(tǒng)計結果轉換成ASCII碼MOV AL,LE59MOV AH,0MOV BL,10DIV BLADD AH,30HADD AL,30HMOV MESS00+6,ALMOV MESS00+7,AHMOV AL,GE60MOV AH,0MOV BL,10DIV BLADD AH,30HADD AL,30HMOV MESS60+6,ALMOV MESS60+7,AHMOV AL,GE80MOV AH,0MOV BL,10DIV BLADD AH,30HADD AL,30HMOV MESS80+6,ALMOV MESS80+7,AH;顯示排

8、序和統(tǒng)計的結果LEA DX,SORTSTRCALLDOS 9CALLDOS 4CHCODEENDSEND START編譯、鏈接結果：執(zhí)行結果：2. 實驗習題：從鍵盤輸入任意輸入一個字符串，統(tǒng)計其中AZ字符出現的次數（不分大小寫，沒出現次數就記為0），并把結果顯示在屏幕上。顯示格式如下：A:xxB:XXZ:xx程序設計：CALLDOSMACRO FUNCTIONMOV AH,FUNCTIONINT 21HENDMDATASEGMENT;提示信息字符串MESSAGEDB 'Please input a string with less than 50 letters:',0DH,0

9、AH,'$'OUTMESSDB 0DH,0AH,'The result is:',0DH,0AH,'$'鍵盤緩沖區(qū)KB_BUFDB 51ACTLENDB ?BUFFERDB 51 DUP(?);數據及統(tǒng)計結果NUMBERSDB 26 DUP(0);統(tǒng)計的數據結果存放在此處ASCNUMS DB 52 DUP(30H);統(tǒng)計的數據結果轉換為ASCII碼后存放在此處;顯示結果的字符串SORTSTRDB 'Sorted numbers:',0DH,0AH,'$'DATAENDS;CODESEGMENTASSUMECS:CO

10、DE,DS:DATASTART:MOV AX,DATAMOV DS,AX;顯示MESSAGE提示信息LEA DX,MESSAGECALLDOS 9LEA DX,KB_BUFCALLDOS 10;把讀入的字符全部轉換為大寫MOV CL,ACTLENLEA SI,BUFFERL1:CMP BYTE PTRSI,'a'JB L2SUB BYTE PTRSI,'a'-'A'L2:INC SILOOP L1;進行統(tǒng)計MOV CL,ACTLENLEA SI,BUFFERL3:LEA DI,NUMBERSMOV AL,SISUB AL,'A'X

11、OR AH,AHADD DI,AXINC BYTE PTRDIINC SILOOP L3;把統(tǒng)計結果轉換成ASCII碼并存放LEA SI,NUMBERSLEA DI,ASCNUMSMOV CL,26L4:MOV AL,SIMOV AH,0MOV BL,10DIV BLADD AH,30HADD AL,30HMOV DI,ALINC DIMOV DI,AHINC DIINC SILOOP L4;輸出統(tǒng)計結果LEA DX,OUTMESSCALLDOS 9MOV CL,26MOV BL,0LEA DI,ASCNUMSL5:MOV AL,'A'ADD AL,BLMOV DL,ALCALLDOS 2MOV DL,':'CALLDOS 2MOV DL,DICALLDOS 2INC DIMOV DL,DICALLDOS 2INC DIINC BLMOV DL,20HCALLDOS 2LOO