1樓:做而論道
datas segment
a1 db ?
a2 db ?
a3 db ?
c dw ?
n dw ?
datas ends
codes segment
assume cs:codes,ds:datas
start:
mov ax, datas
mov ds, ax
mov a1, 09h ;為迴圈次數a1賦初值
x1:mov a2, 09h ;為迴圈次數a2賦初值
x2:mov a3, 09h ;為迴圈次數a3賦初值
x3:call cube1 ;計算立方和
call num ;計算數本身的大小
mov ax, c
cmp ax, n ;比較立方和與數本身
jne x4
call print2
x4:sub a3, 1
jns x3
sub a2, 1
jns x2
sub a1, 1
jns x1
exit:
mov ah, 4ch
int 21h
;-------------------------------
cube1: ;計算立方和
mov bl, a1
call cube2
mov c, ax
mov bl, a2
call cube2
add c, ax
mov bl, a3
call cube2
add c, ax
ret;-------------------------------
cube2: ;計算立方
mov ax, 1
mul bl
mul bl
mul bl
ret;-------------------------------
num: ;計算數本身的大小
mov ah, 00h
mov al, a1
mov bl, 64h
mul bl
mov n, ax
mov ah, 00h
mov al,a2
mov bl, 0ah
mul bl
add n, ax
mov ah, 00h
mov al, a3
add n, ax
ret;-------------------------------
print2: ;輸出符合的數字
mov ah, 2
mov dl, a1
add dl, '0'
int 21h
mov dl, a2
add dl, '0'
int 21h
mov dl, a3
add dl, '0'
int 21h
call print3
ret;-------------------------------
print3: ;輸出換行
mov ah, 2
mov dl, 0dh
int 21h
mov dl, 0ah
int 21h
ret;-------------------------------
codes ends
end start
參考
請懂電腦配置的人來幫我在原來的主機基礎上重新配個好一點的配置
你這個配置已經徹底淘汰 無法修補 花錢能換上的配件也是二手的 而且是很多年前的配件 別浪費錢修補!留下顯示器 空機箱 其餘全換 說說你的預算吧 千萬別買成品主機,別管 還是其他的 配件貓膩嚴重,無法證明身份 這些主機是返修配件 二手 工包等組裝的 你這配置,都得換,上就有一些自己diy的遊戲主機,也...
在我的基礎上,CPA多久能考過,零基礎考注會要多久才能考過
cpa考試分兩階段 第一段考會計 審計 財務成本管理 公司戰略與風險管理 經濟法 稅法,發專業合格證。第二段考職業能力綜合測試,發全科合格證。只有拿下第一階段才允許報考第二階段。所以1年能拿下cpa是不可能的。即便是第一階段一次性拿下的概率也在十萬分之一左右 假設每科通過率10 那麼6課同時過的概率...
金蝶KIS,我在原有的物料基礎上新增新的物料時要儲存的
這個可能跟你的 有關係 比如txm是01 那麼你新增txt的時候 應為01.001 試試 上下級組之間有個點的 您好,可以檢查您的物料txt的物料 是不是用點隔開來,如001.01,則必須要新增001為上級組後,才能新增001.01的明細物料。金蝶k3新建的帳套,初始化設定,新增客戶 物料等,我新增...