計算機程序編寫

1、設(shè)在數(shù)據(jù)段中有X,Y兩變量（字節(jié)單元），試編寫程序段計算（只寫有關(guān)程序功能的指令）：Y=X當(dāng)X>=0丫=0當(dāng)X<0解:moval,xcmpa;,0jgeAlmoval,0Al:movy,al2在STR單元開始定義了一長度為LEN字節(jié)的字符串，統(tǒng)計出其中大寫字母的個數(shù)并存放到LARGE字節(jié)單元中。請編一完整的源程序。DATASEGMENTSTRDB''LENEQU$-STRLARGEDB?DATAENDSCDEGMENTASSUMECS:CD,DSATALARGPROCFARMOVAX,DATAMOVDS,AXLEASI,STRMOVCX,LENMOVBL,0NT：CMPBYTEPTR[SI],'A'JBNOLARGCMPBYTEPTR[SI],2JANOLARGINCBLNOLARG：INCSILOOPNTMOVLARGE,BLMOVAH,4CHINT21HLARGENDPCDENDSENDLARG3、已知DATl字節(jié)單元有一個數(shù)據(jù)，試編制一程序段將該數(shù)據(jù)的低4位變?yōu)?010B,最高位（第7位）置1,其余3位不變，結(jié)果送DAT2字節(jié)單元。MOVAL,DATA1ANDAL,70HADDAL,8AHMOVDATA2,AL4、在N1和N2兩數(shù)據(jù)區(qū)中，分別有10H個帶符號數(shù)。試編制一源程序，找出對應(yīng)項中較小的數(shù)據(jù)，并將這些較小的數(shù)據(jù)存入N3數(shù)據(jù)區(qū)中（要求：對應(yīng)項比較時必須用CMPS指令）。DATASEGMENTN1DBXX,XX,XX,編程將ARRAY分成兩個數(shù)組：正數(shù)數(shù)組P_ARY和負(fù)數(shù)數(shù)組N_ARY,并分別顯示正數(shù)項個數(shù)和負(fù)數(shù)項個數(shù)。要求：源程序格式完整。datasegmentarraydw1,2,-1,3,4,-2,-3,4,5,-6P_ARYdw10dup(?)N_ARYdw10dup(?)；以上是定義dataendscodesegmentassumecs:code,ds:datastart:movax,datamovds,axleabx,arrayleasi,N_ARYleadi,P_ARYmovex,10again:;這里是比較;這里是比較；＞0放入OKI；〈0放入0K0;否則放入0K3jgok2jmpok3okl:movax,[bx.mov[di],axadddi,2jmpok3ok2:movax,[bx]mov[si],axaddsi,2jmpok3ok3:addbx,2decexjnzagainmovah,4chint21hcodeendsendstart16、X,Y,Z三個字節(jié)存儲單元中各有一個無符號數(shù)，其中有兩個數(shù)據(jù)相等，找出不相等的哪個數(shù)，并存入W單元中，試編寫完成上述功能的程序段（只編寫有關(guān)代碼部分，勿需書寫源程序格式）。moval,xempal,yjexyjnenxyxy:moval,zmovw,aljmpovernxy:empal,zjexzjnenxzxz:moval,ymovw,aljmpovernxz:movw,alover:17、在數(shù)據(jù)段偏移量為100H開始的存儲空間內(nèi)連續(xù)存放著10個字節(jié)型無符號二進(jìn)制數(shù)，編寫一段程序，求出該10個數(shù)之和，并將結(jié)果存放在寄存器AX中。18、試編寫一個匯編語言程序，要求對鍵盤輸入的小寫字母用大寫字母顯示出來。BEGIN:MOVAH,1；從鍵盤輸入一個字符的DOS調(diào)用INT2111CMPAL,'a'；輸入字符〈'a'嗎？JBSTOPCMPAL,氣；輸入字符〉T嗎？JASTOPSUBAL,20H；轉(zhuǎn)換為大寫字母，用ANDAL,11011111B也可MOVDL,AL；顯示一個字符的DOS調(diào)用MOVAH,2INT21HJMPBEGINSTOP:RET已知有256個字節(jié)整數(shù)Al、A2、A3、……、A256存放在以NUMBER為首址的數(shù)據(jù)區(qū)中，編寫一完整源程序?qū)⑵渲械呢?fù)數(shù)去除后剩下的正數(shù)重新排序存放在以PLUS開始的數(shù)據(jù)區(qū)中。DATASEGMENTNUMBERDB1,2,3,252DUP0,256PLUSDB256DUP(0)DATAENDSCODESEGMENTASSUMECS:CODE,DS:DATASTART:MOVAX,@DATAMOVDS,AXMOVSI,OFFSETNUMBERMOVDI,OFFSETPLUSXNEXT:MOVAL,[SI]CMPAL,7FHJZnegativesMOVDS:[DI],ALINCDInegatives:INCSICMPSI,255JZEXITSJMPXNEXTEXITS:MOVAH,4CHINT2111CODEENDSENDSTARTN2DBXX,XX,XX,??…N3DB10HDUP(0)DATAENDS解：STACKSEGSEGMENTSTACKDB1024DUP(O)STACKSEGENDSDATASEGMENTN1DB5Ah,6Fh,2Eh,0D8h,0E3h,9Ch,ODBh,0B7h,5Bh,21h,35h,8Eh,4Ah,15h,58h,75hN2DB58h,OFFh,5Eh,38h,0C7h,OAlh,26h,86h,48h,35h,48h,16h,OBAh,OFAh,ODFh,0E9hN3DB10HDUP(0)DATAENDSCODESEGMENTASSUMECS:CODE,DS:DATA,SS:STACKSEGSTART:MOVMOVINCSTART:MOVMOVINCMOVMOVMOVMOVMOVSTART:MOVMOVINCMOVMOVMOVMOVSTART:MOVMOVINCMOVMOVMOVMOVMOVAX,DATADS,AXAXES,AXSI,OFFFFHDI,OFFFFHCX,lOhBX,OFFSETN3AGAIN:CMPSBYTEPTRN1,BYTEPTRN2JLNILESMOVAL,[Sl+lOh]MOV[BX][SI],ALJMPCMPAGAINNILES:MOVAL,[si]MOV[BX][SI],ALCMPAGAIN:decexjnzagainMOVAH,4CHINT21HCODEENDSENDSTART5、加密移動字符串，設(shè)緩沖區(qū)SBUFF中有20個小寫字母a,將每個a加上它相對于緩沖區(qū)的位移量后傳送到緩沖區(qū)DBUFFoSTACKSEGSEGMENTSTACKDB1024DUP(0)STACKSEGENDSDATASEGMENTSBUFFDB20DUP('a')DBUFFDB20DUP(0)DATAENDSCODESEGMENTASSUMECS:CODE,DS:DATA,SS:STACKSEGSTART:MOVAX,DATAMOVDS,AXMOVCX,20MOVSI,0CLDAGAIN:LODSBMOVBX,SIDECBXADDAX,BXMOVdbuff[si-i],alLOOPAGAINDBUFFINT21HMOVAH,4CHINT21HCODEENDSENDSTART6、在BUF1和BUF2兩個數(shù)據(jù)區(qū)中，各定義有10個帶符號字?jǐn)?shù)據(jù)，試編制一完整的源程序，求它們對應(yīng)項的和，并將和數(shù)存入以SUM為首址的數(shù)據(jù)區(qū)中。DATASEGMENTBUF1DW-56,24,54,-1,89,-8,……BUF2DW45,-23,124,345,-265,……SUMDW10DUP(0)DATAENDSCODESEGMENTASSUMECS:CODE,DS:DATABEGIN:MOVAX,DATAMOVES,AXMOVDS,AXLEASI,BUF1MOVBX,OFFSETBUF2LEADI,SUMMOVCX,10LI:MOVAX,[SI]ROLAX,1JCL2RORAX,1L4:MOVDX,AXMOVAX,[BX]ROLAX,1JCL3RORAX,1L5:ADDAX,DXMOV[DI],AXINCBXINCBXINCSIINCSIINCDIINCDILOOPLIJMPLASTL2:RORAX,1NEGAXJMPL4L3:RORAX,1NEGAXJMPL5LAST:MOVAH,4CHINT21HCODEENDSENDBEGIN7、試編寫一個匯編語言程序，要求對鍵盤輸入的小寫字母用大寫字母顯示出來。DATASSEGMENTMSGDB0,0,〃H〃，〃$〃CRDB13,10,〃$〃TABIDB〃0123456789ABCDEF〃DATASENDSSTACKSSEGMENTSTACKSENDSCODESSEGMENTASSUMECS:CODES,DS:DATAS,ES:DATAS,SS:STACKSSTART:MOVAX,DATASMOVDS,AXMOVES,AXMOVCX,127MOVDL,0MOVSI,OFFSETTABIMOVDI,OFFSETMSGAG:PUSHCXPUSHDXMOVAX,0MOVAL,DLMOVBL,1OHDIVBLMOVBX,0MOVBL,AHMOVDH,[SI+BX]MOV[DI+1],DHMOVBL,ALMOVDH,[SI+BX]MOV[DI],DHPUSHDXMOVDX,OFFSETMSGMOVAH,9INT21HPOPDXMOVAH,2INT21HPUSHAXMOVDX,OFFSETCRMOVAH,9INT21HPOPDXPOPDXPOPCXINCDLLOOPAGMOVAH,4CHINT21HCODESENDSENDSTART8、匯編程序，以BUF為首地址的內(nèi)容存單元中有1~15的平方表。查表求X單元中數(shù)（廣15之間）的平方值并送回X單元codesegmentassumecs:code,ds:codeorglOOhstart:pushcspopdsleabx,BUF;BX指向表首moval,Xdecal;偏移送ALxlat;查表movX,al;平方值并送回X單元movah,4chint21hBUFdb1,4,9,16,25,36,49,64,81,100,121,144,169,196,225Xdb8codeendsendstart9、已知存儲器中有一個首地址為ARRAY的100個字?jǐn)?shù)組，現(xiàn)要求把數(shù)組中的每個數(shù)加1(不考慮溢出的可能性)，試編制完成此功能的程序段。MOVBX,OFFSETARRAYMOVAX,1MOVCX,100L00P1:ADD[BX],AXLOOPL00P110、.編寫一段程序，如果字節(jié)變量TESTONE和TESTTWO相等，則調(diào)用子程序，顯示'#'；否則調(diào)用NOTSAME子程序，顯不'！'。datasegmentinfondbOdh,Oah,5#$，infon2dbOdh,Oah,’!$'TESTONEdbOdh,Oah,'2$'TESTTWOdbOdh,Oah,'1$'dataendsstacksegmentstackdb200dup(O)stackendscodesegmentassumeds:data,ss:stack,cs:codestart:movax,offsetTESTONEmovbx,offsetTESTTWOempax,bxjek2jneklkl:callshowk2:callNOTSAMEexit:movah,4chint21hshowprocnear；leadx,infonmovah,9int21hretshowendpNOTSAMEprocnear；leadx,infon2;在屏幕上顯示提示信息movah,9int21hretNOTSAMEendpcodeendsendstart11、已定義了兩個整數(shù)變量A和B,試編寫程序完成下列功能：A.若兩個數(shù)中有一個是奇數(shù)，則將奇數(shù)存入A中，偶數(shù)存入B中。B.若兩個數(shù)均為奇數(shù)，則將兩數(shù)均加1后存回原變量。C.若兩個數(shù)均為偶數(shù)，則兩個變量均不改變。（要求各段定義完整，并畫出程序流程圖）datasegmentadb3bdb3dataendscodesegmentassumeds:data,cs:codestart:movax,datamovds,axtesta,1jznextltestb,1jztjincaincbjmptjnextl:testb,1jztjmoval,axchgal,bmova,altj：movah,4chint21hcodeendsendstart12、假設(shè)DATAX和DATAX+2單元存放雙字P,DATAY和DATAY+2單元中存放雙字Q,編程計算2P-Q,差在DX,AX中。若OF=1,程序轉(zhuǎn)OVERFLOW,否則轉(zhuǎn)NOOVER。（只寫與試題要求有關(guān)的指令語句）DATASEGMENTDATAXDW2321H,3243HDATAYDW1233H,4332HDATAENDSCODESEGMENTASSUMEDS:DATA,CS:CODESTART:MOVAX,DATAMOVDS,AXMOVDX,DATAX+2MOVAX,DATAXSHLAX,1RCLDX,1;求2PSUBAX,DATAYSBBDX,DATAY+2;求2P-QJOOVERFLOWNOFLOW:MOVAH,0JMPEXITOVERFLOW:MOVAH,1EXIT:MOVAX,4C00HINT21HCODEENDSENDSTART13、已知在數(shù)據(jù)區(qū)BUF1和BUF2分別存放20個字節(jié)數(shù)據(jù)。編程檢查兩數(shù)據(jù)區(qū)中的數(shù)據(jù)是否相同。若完全一致，則將標(biāo)志單元FLAG置FFH,否則置0,并將第一次出現(xiàn)的不同數(shù)據(jù)的地址分別存放在ADDR1和ADDR2單元中。要求：源程序格式完整。datasegmentxdw?ydw?msgdb'continue?YesorNo?$，msgldb'Inputfirstnumber:$'msg2db?Inputsecondnumber:$'msg3db'Shangis:$'dataendsdecihexsegmentassumecs:decihex,ds:datamainprocfarmovax,datamovds,axrepeat:leasi,xleadx,msglmovah,9int