輸入一個數(shù)N，對1到N的所有自然數(shù)求和

程序運行：

?

代碼：

datas segmentN_string_max_length db 0ffhN_string db 0, 100h dup(?)N dw 0 sum dd 0 input db 'input N=$'output db 0dh,0ah,'output sum=$'datas endsstacks segment stackdb 100h dup(?)stacks endscodes segmentassume cs:codes,ds:datas,ss:stacks main proc far start:push dsmov ax,0hpush axmov ax,datas ;初始化dsmov ds,ax;輸入提示lea dx,inputmov ah,9int 21h;輸入Nlea dx,N_string_max_lengthmov ah,10 int 21h;轉(zhuǎn)換成為數(shù)字lea si,N_stringcall todigitmov N,axmov ax,0 mov dx,0mov cx,N ;循環(huán)的次數(shù)mov bx,1 ;求和從一開始s:add ax,bx ;求和adc dx,0 inc bx loop smov word ptr sum,ax ;保存求和的結(jié)果mov word ptr sum+2,dxlea dx,output ;輸出提示mov ah,9int 21h mov ax,word ptr sum ;輸出求和mov dx,word ptr sum+2call print_decimalretmain endptodigit proc near uses bx cx dx si di ;si ,axmov cl,[si] ;設置循環(huán)次數(shù)xor ch,ch inc si ;si指向第一個元素mov ax,0 ;初始化ax,dxmov dx,0 mov di,10 ;除數(shù)dig:mov bl,[si] cmp bl,'0' ;判斷是否小于'0'jb err ;若低于'0'，則錯誤字符cmp bl,'9' ;判斷是否大于'9'ja err ;若高于'9'，則錯誤字符sub bl,30h ;否則，將數(shù)字字符轉(zhuǎn)成數(shù)字xor bh,bh mul di ;乘十a(chǎn)dd ax,bx ;加上個位adc dx,0 inc siloop digcmp dx,0 ;判斷高位是否為0jnz err ;若不為0,錯誤jmp exit err: ;輸出錯誤push ds push cs pop ds lea dx,error_tip mov ah,9int 21hpop dsmov ah,4ch int 21hexit:ret error_tip db 0dh,0ah,'input error$' todigit endpprint_decimal proc near uses ax bx cx dx mov bx,10 mov cx,0 dea: div bx push dx inc cx xor dx,dx cmp ax,0 jnz deadea1:pop dxadd dl,30hmov ah,2int 21hloop dea1 ret print_decimal endp codes endsend main

?

創(chuàng)作挑戰(zhàn)賽新人創(chuàng)作獎勵來咯，堅持創(chuàng)作打卡瓜分現(xiàn)金大獎

總結(jié)

以上是生活随笔為你收集整理的汇编语言（二十六）之自然数求和的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。