80x86匯編語(yǔ)言編程：顯示楊輝三角形
看到一個(gè)要求輸出“楊輝三角形”的題目：
循著給出的鏈接，找到了百度文庫(kù)，看了一篇又一篇文章、程序，感覺(jué)好像是一個(gè)賽著一個(gè)的羅嗦。
楊輝三角形，大家都知道，排列形狀如下：
1?1
1?2?1
1?3?3?1
1?4?6?4?1
1?5?10?10?5?1
1?6?15?20?15?6?1
… … … …
各個(gè)元素的數(shù)值，其排列的規(guī)律也很簡(jiǎn)單，就是上一行的兩個(gè)相鄰元素之和。
按照這個(gè)規(guī)律，最左邊和最右邊，還應(yīng)該各有一列零。當(dāng)然，零就不顯示了。
有人總結(jié)的規(guī)律，則要高深的多，竟然用上了排列組合的公式，呵呵，這樣一來(lái)，編程，還能簡(jiǎn)單得了嗎？
計(jì)算任意一行，都要把上一行的兩個(gè)相鄰數(shù)據(jù)，相加、保存。相加的和如果為零，這一行，就計(jì)算完畢了。
比如，上一行是?1?2?1，就可以這樣算：
1．先用?0?加上?1，這里的?0，就是不顯示的《左邊元素》，1，就是《右邊元素》，即第一個(gè)元素。和為?1，應(yīng)該存入第一個(gè)元素的位置。
但是，別忙，這第一個(gè)元素，將來(lái)還要和它右邊的相加，所以要先保存它之后，再存放剛才的和。
2．再用剛保存的?1，當(dāng)做《左邊元素》，用?2?當(dāng)做《右邊元素》，相加為?3；在預(yù)先保存了?2?之后，把?3?存入?2?的位置。
3．再用剛保存的?2，當(dāng)做《左邊元素》，用?1?當(dāng)做《右邊元素》，相加為?3；在預(yù)先保存了?1?之后，把?3?存入?1?的位置。
4．再用剛保存的?1，當(dāng)做《左邊元素》，用?0?當(dāng)做《右邊元素》，相加為?1；在預(yù)先保存了?0?之后，把?1?存入?0?的位置。
5．再用剛保存的?0，當(dāng)做《左邊元素》，其《右邊元素》顯然也是?0，相加為?0；結(jié)束運(yùn)算。
每一行，都這樣計(jì)算，算出來(lái)的結(jié)果，可以當(dāng)場(chǎng)輸出。
想要輸出多少行，就這樣算多少遍。
經(jīng)過(guò)推算，第?19?行，其最大的元素，就超過(guò)了?65535。大于?65535?的數(shù)字，用?16?位機(jī)來(lái)計(jì)算，難度就明顯加大了。
那么，用?8088?CPU?匯編語(yǔ)言編程來(lái)計(jì)算楊輝三角形，最大的行數(shù)，做而論道認(rèn)為還是以?18?行為好。
;做而論道用匯編語(yǔ)言編寫(xiě)的輸出《楊輝三角形》的程序如下：
;=====================================
DATAS????SEGMENT
??tmp1?DW??1,?20??DUP(0)??;定義空間用于運(yùn)行過(guò)程中臨時(shí)存儲(chǔ)數(shù)據(jù)
????
?TITL??DB??0AH,?0DH,?'------------------------------------------'
???????DB??0AH,?0DH,?'??????????YangHui???triangel'
???????DB??0AH,?0DH,?'------------------------------------------',?0AH,?0DH
???????DB??'Please?input?the?output?LineNumber?[1~18]:?$'
????X??DW???
DATAS?ENDS
;--------------------------------
CODES???SEGMENT
????ASSUME???CS:CODES,?DS:DATAS
START:
????MOV???AX,?DATAS
????MOV???DS,?AX
;--------------------------------
????LEA???DX,?TITL
????MOV???AH,?9
????INT???21H
????CALL??IN_NUM????????;輸入行數(shù)
;------------------------
????MOV???CX,?X?????????;取來(lái)剛輸入的數(shù)字
????CMP???CX,?0
????JZ????EXIT??????????;判斷是否符合范圍要求
????CMP???CX,?18
????JA????EXIT
????CALL??CR_LF?????????;回車(chē)換行
????CALL??CR_LF
M_LOP:??????????????????;CX=1~18
????LEA???SI,?tmp1
????MOV???BX,?0
????CALL??YangHui???????;輸出一行
????CALL??CR_LF
????LOOP??M_LOP?????????;循環(huán)1~18次
;--------------------------------
EXIT:
????MOV???AH,?4CH
????INT???21H
;=====================================
YangHui:????????????????;計(jì)算楊輝三角形
????MOV???AX,?[SI]??????;取出數(shù)據(jù)
????ADD???AX,?BX????????;加上《左邊數(shù)據(jù)》
????MOV???BX,?[SI]??????;再次取出數(shù)據(jù)，當(dāng)做下次的《左邊數(shù)據(jù)》
????MOV???[SI],?AX??????;保存和
????JZ????END_YH????????;為零就停止
????ADD???SI,?2
????CALL??PRINT_AX??????;輸出
????CALL??SPACE
????JMP???YangHui???????;循環(huán)
END_YH:
????RET??????;一行，計(jì)算完畢?！∵@個(gè)算法，是不是很簡(jiǎn)單???
;=====================================
IN_NUM:?????????????????;輸入數(shù)字
????MOV???X,??0?????????;先清零
????MOV???CX,?2?????????;輸入2位
IN_X:
????MOV???AH,?7?????????;輸入單個(gè)字符
????INT???21H
????CMP???AL,?13
????JE????END_IN????????;結(jié)束
????CMP???AL,?'0'
????JB????IN_X??????????;小于'0'，不是數(shù)字
????CMP???AL,?'9'
????JA????IN_X
????MOV???DL,?AL
????MOV???AH,?2?????????;顯示單個(gè)字符
????INT???21H
????MOV???AL,?DL
???
????SUB???AL,?'0'???????;還原為數(shù)字
????MOV???AH,?0
????MOV???SI,?AX????????;暫存新數(shù)據(jù).
;
????MOV???AX,?X
????MOV???BX,?10????????;老數(shù)據(jù)乘以10
????MUL???BX
????ADD???AX,?SI????????;加上新數(shù)據(jù)
????MOV???X,??AX????????;保存
????LOOP??IN_X??????????;繼續(xù)輸入
END_IN:
????RET
;=====================================
PRINT_AX:
????PUSH??BX
????PUSH??CX
????PUSH??DX
????MOV???BX,?10
????MOV???CX,?0
P_LOP1:
????MOV???DX,?0
????DIV???BX
????INC???CX
????PUSH??DX
????CMP???AX,?0
????JNZ???P_LOP1
????MOV???AH,?2
P_LOP2:
????POP???DX
????ADD???DL,?'0'
????INT???21H
????LOOP??P_LOP2
????POP???DX
????POP???CX
????POP???BX
RET
;=====================================
CR_LF:??????????????????;顯示回車(chē)換行
????PUSH??AX
????PUSH??DX
????MOV???AH,?2
????MOV???DL,?13
????INT???21H
????MOV???DL,?10
????INT???21H
????POP???DX
????POP???AX
????RET
;=====================================
SPACE:??????????????????;顯示空格
????PUSH??AX
????PUSH??DX
????MOV???AH,?2
????MOV???DL,?'?'
????INT???21H
????POP???DX
????POP???AX
????RET
;=====================================
CODES???ENDS
????END???START
程序執(zhí)行的結(jié)果：
c:masm510>?M1
------------------------------------------
??????????YangHui???triangel
------------------------------------------
Please?input?the?output?LineNumber?[1~18]:?18
1?1
1?2?1
1?3?3?1
1?4?6?4?1
1?5?10?10?5?1
1?6?15?20?15?6?1
1?7?21?35?35?21?7?1
1?8?28?56?70?56?28?8?1
1?9?36?84?126?126?84?36?9?1
1?10?45?120?210?252?210?120?45?10?1
1?11?55?165?330?462?462?330?165?55?11?1
1?12?66?220?495?792?924?792?495?220?66?12?1
1?13?78?286?715?1287?1716?1716?1287?715?286?78?13?1
1?14?91?364?1001?2002?3003?3432?3003?2002?1001?364?91?14?1
1?15?105?455?1365?3003?5005?6435?6435?5005?3003?1365?455?105?15?1
1?16?120?560?1820?4368?8008?11440?12870?11440?8008?4368?1820?560?120?16?1
1?17?136?680?2380?6188?12376?19448?24310?24310?19448?12376?6188?2380?680?136?17?1
1?18?153?816?3060?8568?18564?31824?43758?48620?43758?31824?18564?8568?3060?816?153?18?1
c:masm510>
不知道能否有人來(lái)驗(yàn)算一下這些數(shù)據(jù)是否正確。
下載文檔
