匯編語(yǔ)言上機(jī)考試三星題5

一個(gè)有符號(hào)字?jǐn)?shù)組以0為結(jié)束標(biāo)志源葫,編程求這個(gè)數(shù)組的最大值些膨、 最小值振诬、平均值椭员。


DATAS SEGMENT

BUF DW 7FFFH,7FFFH,0

MAX DW 0000H

MIN DW 0000H

EVA DW 0000H

NUM DW 16

OPT DB 'THE MAX IS'

OMAX DB '0000H',0DH,0AH,'THE MIN IS'

OMIN DB '0000H',0DH,0AH,'THE EVA IS'

OEVA DB '0000H$'

? ? ;此處輸入數(shù)據(jù)段代碼?

DATAS ENDS

CODES SEGMENT

MAIN PROC FAR

? ? ASSUME CS:CODES,DS:DATAS

? ? MOV AX,DATAS

? ? MOV DS,AX

? ? CALL FMAX

? ? CALL FMIN

? ? CALL FEVA

? ? CALL TRAN

? ? LEA DX,OPT

? ? MOV AH,09H

? ? INT 21H

? ? ;此處輸入代碼段代碼

? ? MOV AH,4CH

? ? INT 21H

MAIN ENDP

FMAX PROC NEAR

MOV AX,BUF

LEA BX,BUF+2

F1: MOV DX,[BX]

CMP DX,0

JZ EMAX

CMP AX,DX

JG NMAX

MOV AX,DX

NMAX:

ADD BX,2

JMP F1

EMAX:

MOV MAX,AX

RET

FMAX ENDP

FMIN PROC NEAR

MOV AX,BUF

LEA BX,BUF+2

F2: MOV DX,[BX]

CMP DX,0

JZ EMIN

CMP AX,DX

JL NMIN

MOV AX,DX

NMIN:

ADD BX,2

JMP F2

EMIN:

MOV MIN,AX

RET

FMIN ENDP

FEVA PROC NEAR

MOV AX,BUF

MOV CX,1

;MOV DX,0

MOV DI,0

LEA SI,BUF+2

F3:

MOV BX,[SI]

CMP BX,0

JZ EEVA

JG NF3

ADD DI,1

NF3:

ADD AX,BX

ADC DX,0

ADD SI,2

INC CX

JMP F3

EEVA:

SUB DX,DI

IDIV CX

MOV EVA ,AX

RET

FEVA ENDP

TRAN PROC NEAR

MOV AX,MAX

LEA BX,OMAX+3

CALL TRANS

MOV AX,MIN

LEA BX,OMIN+3

CALL TRANS

MOV AX, EVA

LEA BX,OEVA+3

CALL TRANS

RET

TRAN ENDP

TRANS PROC NEAR

MOV CX,4

L1:

MOV DX,0

DIV NUM

CMP DL,9

JNA NEXT

ADD DL,7

NEXT:

ADD [BX],DL

DEC BX

LOOP L1

RET

TRANS ENDP

CODES ENDS

? ? END MAIN

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市碧浊,隨后出現(xiàn)的幾起案子涂邀,更是在濱河造成了極大的恐慌,老刑警劉巖箱锐,帶你破解...
    沈念sama閱讀 216,591評(píng)論 6 501
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件比勉,死亡現(xiàn)場(chǎng)離奇詭異,居然都是意外死亡驹止,警方通過(guò)查閱死者的電腦和手機(jī)浩聋,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 92,448評(píng)論 3 392
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái)臊恋,“玉大人衣洁,你說(shuō)我怎么就攤上這事《督觯” “怎么了坊夫?”我有些...
    開(kāi)封第一講書(shū)人閱讀 162,823評(píng)論 0 353
  • 文/不壞的土叔 我叫張陵,是天一觀的道長(zhǎng)撤卢。 經(jīng)常有香客問(wèn)我环凿,道長(zhǎng),這世上最難降的妖魔是什么放吩? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 58,204評(píng)論 1 292
  • 正文 為了忘掉前任智听,我火速辦了婚禮,結(jié)果婚禮上渡紫,老公的妹妹穿的比我還像新娘到推。我一直安慰自己,他們只是感情好惕澎,可當(dāng)我...
    茶點(diǎn)故事閱讀 67,228評(píng)論 6 388
  • 文/花漫 我一把揭開(kāi)白布莉测。 她就那樣靜靜地躺著,像睡著了一般集灌。 火紅的嫁衣襯著肌膚如雪悔雹。 梳的紋絲不亂的頭發(fā)上,一...
    開(kāi)封第一講書(shū)人閱讀 51,190評(píng)論 1 299
  • 那天欣喧,我揣著相機(jī)與錄音腌零,去河邊找鬼。 笑死唆阿,一個(gè)胖子當(dāng)著我的面吹牛益涧,可吹牛的內(nèi)容都是我干的。 我是一名探鬼主播驯鳖,決...
    沈念sama閱讀 40,078評(píng)論 3 418
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼闲询,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼!你這毒婦竟也來(lái)了浅辙?” 一聲冷哼從身側(cè)響起扭弧,我...
    開(kāi)封第一講書(shū)人閱讀 38,923評(píng)論 0 274
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤,失蹤者是張志新(化名)和其女友劉穎记舆,沒(méi)想到半個(gè)月后鸽捻,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體,經(jīng)...
    沈念sama閱讀 45,334評(píng)論 1 310
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡泽腮,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 37,550評(píng)論 2 333
  • 正文 我和宋清朗相戀三年御蒲,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片诊赊。...
    茶點(diǎn)故事閱讀 39,727評(píng)論 1 348
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡厚满,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出碧磅,到底是詐尸還是另有隱情碘箍,我是刑警寧澤,帶...
    沈念sama閱讀 35,428評(píng)論 5 343
  • 正文 年R本政府宣布续崖,位于F島的核電站敲街,受9級(jí)特大地震影響,放射性物質(zhì)發(fā)生泄漏严望。R本人自食惡果不足惜多艇,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,022評(píng)論 3 326
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望像吻。 院中可真熱鬧峻黍,春花似錦、人聲如沸拨匆。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 31,672評(píng)論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)惭每。三九已至骨饿,卻和暖如春亏栈,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背宏赘。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 32,826評(píng)論 1 269
  • 我被黑心中介騙來(lái)泰國(guó)打工绒北, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留,地道東北人察署。 一個(gè)月前我還...
    沈念sama閱讀 47,734評(píng)論 2 368
  • 正文 我出身青樓闷游,卻偏偏與公主長(zhǎng)得像,于是被迫代替她去往敵國(guó)和親贴汪。 傳聞我的和親對(duì)象是個(gè)殘疾皇子脐往,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 44,619評(píng)論 2 354