AI 助理
备案控制台
开发者社区 安全 文章 正文

微机原理||十进制输入、数组中负数个数、字符串比较程序

2024-06-11 53
版权
版权声明：
本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《 阿里云开发者社区用户服务协议》和 《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写 侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。
简介： 微机原理||十进制输入、数组中负数个数、字符串比较程序

[实验目的]

  1. 熟悉8086宏汇编实验环境，包括编辑（NotePad）、汇编MASM、链接LINK、调试debug32、运行等开发环境的使用，学习简单程序调试运行。
  2. 熟悉微机原理，掌握8086/8088CPU内部结构，熟悉8086/8088指令系统。
  3. 熟练掌握汇编语言程序设计方法，通过本实验初步培养计算机逻辑解题能力，熟练掌握十进制输的输入输出方法；掌握字符串的操作方法。

[实验要求]

在规定期限独立完成实验内容

  1. 提交实验报告（电子版）
  2.     2.提交相应源程序文件

[实验内容]

按要求编写以下程序：十进制输入、数组中负数个数、字符串比较程序

1.从键盘输入一个十进制数（无符号数）并在屏幕上显示输出

1）输入一个十进制数（无符号数）
data    segment
flag    dw     ?
dat1    dw     ?
data    ends
 
code    segment
        assume cs:code,ds:data
begin:
        mov ax,data
        mov ds,ax
 
    call dec_in
    mov  dat1,bx
    call dec_show
 
    mov ah,4ch
        int 21h
 
dec_in proc
    mov bx,0
indig:  mov ah,1
    int 21h
    sub al,30h
    jb  exit2
    cmp al,9
    ja  exit2
    cbw
    xchg ax,bx
    mov  cx,10
    mul  cx
    xchg ax,bx
    add bx,ax
    jmp indig
 exit2:ret
dec_in endp
 
dec_show proc
        mov flag,1
        mov cx,10000
        call dec_div
        mov cx,1000
        call dec_div
        mov cx,100
        call dec_div
        mov cx,10
        call dec_div
        mov cx,1
        call dec_div
    ret
dec_show endp
        dec_div proc
        mov dx,0
        mov ax,bx
        div cx
        mov bx,dx
        mov dl,al
    cmp dl,0
    jnz print
    cmp flag,1
    jz  exit
print:  add dl,30h
        mov ah,2
        int 21h
    mov flag,0
exit:   ret
dec_div endp
 
code ends
     end begin

2.从键盘输入一个十进制数（带符号数）并在屏幕上显示输出

2）输入一个十进制数（带符号数）
data    segment
flag    dw     ?
dat1    dw     ?
f2      dw     0 
data    ends
 
code    segment
        assume cs:code,ds:data
begin:
        mov ax,data
        mov ds,ax
 
    call f_dec_in
    mov  dat1,bx
    call f_dec_show
 
    mov ah,4ch
        int 21h
 
f_dec_in proc
        mov bx,0
    mov ah,1
    int 21h
    cmp al,'-'
    jnz posi
    mov f2,1
    jmp nega
posi: sub al,30h
        mov ah,0
    mov bx,ax  
nega: call dec_in
        cmp f2,1
    jnz e3
    neg bx
e3:     ret
f_dec_in endp
 
dec_in proc
indig: mov ah,1
     int 21h
     sub al,30h
     jb  exit2
     cmp al,9
     ja  exit2
     cbw
     xchg ax,bx
     mov  cx,10
     mul  cx
     xchg ax,bx
     add bx,ax
     jmp indig
 exit2:ret
dec_in endp
 
f_dec_show proc
    and bx,bx
    jns show
    mov dl,'-'
    mov ah,2
    int 21h
    neg bx
show: call dec_show
    ret
f_dec_show endp
 
dec_show proc
        push cx
    mov flag,1
        mov cx,10000
        call dec_div
        mov cx,1000
        call dec_div
        mov cx,100
        call dec_div
        mov cx,10
        call dec_div
        mov cx,1
        call dec_div
    pop cx
    ret
dec_show endp
        
    
 
dec_div proc
        mov dx,0
        mov ax,bx
        div cx
        mov bx,dx
        mov dl,al
    cmp dl,0
    jnz print
    cmp flag,1
    jz  exit
print:  add dl,30h
        mov ah,2
        int 21h
    mov flag,0
exit:   ret
dec_div endp
 
code ends
     end begin

3.从键盘输入若干个十进制数（带符号数）存入数组中并显示

3）输入若干个十进制数（带符号数）存入数组中
data    segment
arr     dw     -3,78,88,95,44,-67,70,-345,-565
n       dw     9
flag    dw     ?
dat1    dw     ?
f2      dw     ?
data    ends
 
code    segment
        assume cs:code,ds:data
begin:
        mov ax,data
        mov ds,ax
 
    call arr_in
 
    call arr_show   
 
    mov ah,4ch
        int 21h
 
arr_in  proc
    lea si,arr
    mov cx,n
t1:   call f_dec_in
    mov [si],bx
    add si,2
    loop t1
    
    ret
arr_in  endp
 
arr_show proc
        lea si,arr
    mov cx,n
t:    mov bx,[si]
    call f_dec_show
    call space_show
    add si,2
    loop t 
        ret
arr_show endp
 
f_dec_in proc
    push cx
    mov f2,0
        mov bx,0
    mov ah,1
    int 21h
    cmp al,'-'
    jnz posi
    mov f2,1
    jmp nega
posi: sub al,30h
        mov ah,0
    mov bx,ax  
nega: call dec_in
        cmp f2,1
    jnz e3
    neg bx
e3:     pop cx
    ret
f_dec_in endp
 
dec_in proc
indig: mov ah,1
     int 21h
     sub al,30h
     jb  exit2
     cmp al,9
     ja  exit2
     cbw
     xchg ax,bx
     mov  cx,10
     mul  cx
     xchg ax,bx
     add bx,ax
     jmp indig
 exit2:ret
dec_in endp
 
f_dec_show proc
    and bx,bx
    jns show
    mov dl,'-'
    mov ah,2
    int 21h
    neg bx
show: call dec_show
    ret
f_dec_show endp
 
dec_show proc
        push cx
    mov flag,1
        mov cx,10000
        call dec_div
        mov cx,1000
        call dec_div
        mov cx,100
        call dec_div
        mov cx,10
        call dec_div
        mov cx,1
        call dec_div
    pop cx
    ret
dec_show endp
        
    
 
dec_div proc
        mov dx,0
        mov ax,bx
        div cx
        mov bx,dx
        mov dl,al
    cmp dl,0
    jnz print
    cmp flag,1
    jz  exit
print:  add dl,30h
        mov ah,2
        int 21h
    mov flag,0
exit:   ret
dec_div endp
 
space_show  proc
        mov dl,20h
    mov ah,2
    int 21h
    ret
space_show  endp
 
crlf  proc
        mov dl,0dh
    mov ah,2
    int 21h
    mov dl,0ah
    mov ah,2
    int 21h
    ret
crlf  endp
code ends
     end begin

4.求数组元素中最大数并显示（带符号数），要求数组中数据从键盘输入

4）数组元素中最大数并显示（带符号数）
data    segment
arr     dw     13,33,-18,99,987,-345,3455,-09,-8769,22
n       dw     10
max     dw     ?
flag    dw     ?
dat1    dw     ?
f2      dw     ?
data    ends
 
code    segment
        assume cs:code,ds:data
begin:
        mov ax,data
        mov ds,ax
 
    call arr_in
 
    call findmax
    mov  bx,max
    call f_dec_show
 
    ;call arr_show    
 
    mov ah,4ch
        int 21h
 
findmax proc
    lea si,arr
    mov ax,[si]
    add si,2
    mov cx,n
    dec n
t2:   cmp ax,[si]
    jge next
    mov ax,[si]
next: add si,2
    loop t2
    mov max,ax
        ret
findmax endp
 
arr_in  proc
    lea si,arr
    mov cx,n
t1:   call f_dec_in
    mov [si],bx
    add si,2
    loop t1
    
    ret
arr_in  endp
 
arr_show proc
        lea si,arr
    mov cx,n
t:    mov bx,[si]
    call f_dec_show
    call space_show
    add si,2
    loop t 
        ret
arr_show endp
 
f_dec_in proc
    push cx
    mov f2,0
        mov bx,0
    mov ah,1
    int 21h
    cmp al,'-'
    jnz posi
    mov f2,1
    jmp nega
posi: sub al,30h
        mov ah,0
    mov bx,ax  
nega: call dec_in
        cmp f2,1
    jnz e3
    neg bx
e3:     pop cx
    ret
f_dec_in endp
 
dec_in proc
indig: mov ah,1
     int 21h
     sub al,30h
     jb  exit2
     cmp al,9
     ja  exit2
     cbw
     xchg ax,bx
     mov  cx,10
     mul  cx
     xchg ax,bx
     add bx,ax
     jmp indig
 exit2:ret
dec_in endp
 
f_dec_show proc
    and bx,bx
    jns show
    mov dl,'-'
    mov ah,2
    int 21h
    neg bx
show: call dec_show
    ret
f_dec_show endp
 
dec_show proc
        push cx
    mov flag,1
        mov cx,10000
        call dec_div
        mov cx,1000
        call dec_div
        mov cx,100
        call dec_div
        mov cx,10
        call dec_div
        mov cx,1
        call dec_div
    pop cx
    ret
dec_show endp
        
    
 
dec_div proc
        mov dx,0
        mov ax,bx
        div cx
        mov bx,dx
        mov dl,al
    cmp dl,0
    jnz print
    cmp flag,1
    jz  exit
print:  add dl,30h
        mov ah,2
        int 21h
    mov flag,0
exit:   ret
dec_div endp
 
space_show  proc
        mov dl,20h
    mov ah,2
    int 21h
    ret
space_show  endp
 
crlf  proc
        mov dl,0dh
    mov ah,2
    int 21h
    mov dl,0ah
    mov ah,2
    int 21h
    ret
crlf  endp
code ends
     end begin

5.求数组元素中负数的个数并显示（带符号数），要求数组中数据从键盘输入

5）数组元素中负数的个数并显示（带符号数）
data    segment
arr     dw      13,33,-18,99,987,-345,3455,-09,-8769,22
n       dw     10
flag    dw     ?
dat1    dw     ?
f2      dw     ?
num     dw     ?
data    ends
 
code    segment
        assume cs:code,ds:data
begin:
        mov ax,data
        mov ds,ax
 
    call arr_in
 
    call count_neg
    mov  bx,num
    call f_dec_show
 
    ;call arr_show    
 
    mov ah,4ch
        int 21h
 
count_neg proc
        mov bx,0
    lea si,arr
    mov cx,n
t2:   mov ax,[si]
    cmp ax,0
    jge next
    inc bx
next: add si,2
    loop t2
    mov num,bx
        ret
count_neg endp
 
arr_in  proc
    lea si,arr
    mov cx,n
t1:   call f_dec_in
    mov [si],bx
    add si,2
    loop t1
    
    ret
arr_in  endp
 
arr_show proc
        lea si,arr
    mov cx,n
t:    mov bx,[si]
    call f_dec_show
    call space_show
    add si,2
    loop t 
        ret
arr_show endp
 
f_dec_in proc
    push cx
    mov f2,0
        mov bx,0
    mov ah,1
    int 21h
    cmp al,'-'
    jnz posi
    mov f2,1
    jmp nega
posi: sub al,30h
        mov ah,0
    mov bx,ax  
nega: call dec_in
        cmp f2,1
    jnz e3
    neg bx
e3:     pop cx
    ret
f_dec_in endp
 
dec_in proc
indig: mov ah,1
     int 21h
     sub al,30h
     jb  exit2
     cmp al,9
     ja  exit2
     cbw
     xchg ax,bx
     mov  cx,10
     mul  cx
     xchg ax,bx
     add bx,ax
     jmp indig
 exit2:ret
dec_in endp
 
f_dec_show proc
    and bx,bx
    jns show
    mov dl,'-'
    mov ah,2
    int 21h
    neg bx
show: call dec_show
    ret
f_dec_show endp
 
dec_show proc
        push cx
    mov flag,1
        mov cx,10000
        call dec_div
        mov cx,1000
        call dec_div
        mov cx,100
        call dec_div
        mov cx,10
        call dec_div
        mov cx,1
        call dec_div
    pop cx
    ret
dec_show endp
       
dec_div proc
        mov dx,0
        mov ax,bx
        div cx
        mov bx,dx
        mov dl,al
    cmp dl,0
    jnz print
    cmp flag,1
    jz  exit
print:  add dl,30h
        mov ah,2
        int 21h
    mov flag,0
exit:   ret
dec_div endp
 
space_show  proc
        mov dl,20h
    mov ah,2
    int 21h
    ret
space_show  endp
 
crlf  proc
        mov dl,0dh
    mov ah,2
    int 21h
    mov dl,0ah
    mov ah,2
    int 21h
    ret
crlf  endp
code ends
     end begin

6.密码输入及验证程序。从键盘输入密码，与程序中设定的原始密码比较，若正确，显示“welcome！！”，若错误，提示错误信息“wrong！！”并要求再次输入，若输入3次密码错误，显示“sorry！！password iswrong。。”并退出程序。

6）密码输入及验证程序
data    segment
pass    db   'gegegege'
n   equ  $ - pass
pasbuf  db  20
    db  ?
    db  20 dup(?)
mess1 db  'password:','$'
mess2 db  'welcome!!!$'
mess3 db  'wrong!!please try agin...',0dh,0ah,'$'
mess4   db  'sorry...password is wrong',0dh,0ah,'$'
data    ends
 
code    segment
        assume cs:code,ds:data,es:data
begin:
        mov ax,data
        mov ds,ax
    mov es,ax
 
    mov bx,3
 
 t:     lea dx,mess1
    mov ah,9
    int 21h
        
    lea dx,pasbuf
    mov ah,0ah
    int 21h
 
    lea si,pass
    lea di,pasbuf
    cmp byte ptr[di+1],n
    jne err_show
    add di,2
    mov cx,n
    cld
    repe cmpsb
    jne err_show
    lea dx,mess2
    call crlf
    mov ah,9
    int 21h
    jmp exit
err_show:call crlf
        lea dx,mess3
    mov ah,9
    int 21h
    dec bx
    jnz t
    lea dx,mess4
    mov ah,9
    int 21h
exit: mov ah,4ch
        int 21h
 
crlf  proc
        push ax
    push dx
        mov dl,0dh
    mov ah,2
    int 21h
    mov dl,0ah
    mov ah,2
    int 21h
    pop dx
    pop ax
    ret
crlf  endp
code ends
     end begin

[实验截图]

文章标签：
数据安全/隐私保护
柠檬茶五元
目录
相关文章
米果粒
|
2月前
判断用户输入的整数是奇数还是偶数
【10月更文挑战第14天】判断用户输入的整数是奇数还是偶数。
米果粒
30 2
热爱技术的小郑
|
4月前
|
C语言
用栈实现将一个十进制数值转换成八进制数值。即用该十进制数值除以8，并保留其余数；重复此操作，直到该十进制数值为0为止。最后将所有的余数反向输出就是所对应的八进制数值
这篇文章展示了如何使用栈（包括顺序栈和链栈）实现将十进制数值转换成八进制数值的方法，通过C语言编程演示了两种栈的实现方式和使用场景。
热爱技术的小郑
212 1
用栈实现将一个十进制数值转换成八进制数值。即用该十进制数值除以8，并保留其余数；重复此操作，直到该十进制数值为0为止。最后将所有的余数反向输出就是所对应的八进制数值
倔强的石头_
|
6月前
|
存储
从键盘输入10个整数，输出最大值
从键盘输入10个整数，输出最大值
倔强的石头_
53 3
JavaPub
|
6月前
|
C语言
【C语言】输入一个正整数，判断其是否为素数
【C语言】输入一个正整数，判断其是否为素数
JavaPub
167 0
柠檬茶五元
|
6月前
微机原理||数组排序、求最大数、负数个数程序
微机原理||数组排序、求最大数、负数个数程序
柠檬茶五元
27 0
修修修也
|
7月前
|
小程序 C语言
【C语言】输入一个十进制正整数，将它对应的二进制数的各位逆序，形成新的十进制数输出。题目分析及拓展应用。
【C语言】输入一个十进制正整数，将它对应的二进制数的各位逆序，形成新的十进制数输出。题目分析及拓展应用。
修修修也
117 0
凉城空子
|
7月前
|
存储 C语言
在C语言中编写，用于从键盘接收输入的整数并判断该数是否能被3整除
在C语言中编写，用于从键盘接收输入的整数并判断该数是否能被3整除
凉城空子
192 0
猪巴戒
|
7月前
|
C语言
[C语言][题]获取一个整数二进制序列中所有的偶数位和奇数位，分别打印出二进制序列
[C语言][题]获取一个整数二进制序列中所有的偶数位和奇数位，分别打印出二进制序列
猪巴戒
52 0
七镜
|
7月前
|
C语言
C语言中通过INT_MAX判断两个非负整数相加是否溢出
C语言中通过INT_MAX判断两个非负整数相加是否溢出
七镜
171 0
风正豪
|
C语言
已知一个整数，如何判断这个整数是无符号的？
已知一个整数，如何判断这个整数是无符号的？
风正豪
100 0

热门文章

最新文章

  • 1
    四大触点，教你从“用户视角”构建数据分析体系
  • 2
    Spring-boot+Dubbo应用启停源码分析
  • 3
    《Stata统计分析与应用（第2版）》一3.4 图形的保存、合并及修改
  • 4
    RocketMq-Request-Reply消息
  • 5
    Confluence 6 手动添加用户
  • 6
    2013年4月20日 通用权限管理系统组件V3.8功能改进说明
  • 7
    Configuring EIGRP Unequal-Cost Paths
  • 8
    PowerShell 指定关键词遍历文件内容
  • 9
    Windows时间服务出现故障 向用户发送错误的时间
  • 10
    三种dedecms调用相关文章的方法
  • 1
    《鸿蒙HarmonyOS应用开发从入门到精通（第2版）》简介
    54
  • 2
    《Python 助力：人工智能模型的“瘦身”与“加速”之旅》
    111
  • 3
    《非计算机专业者：Python 开启人工智能职业新航道》
    40
  • 4
    《Python赋能：智绘智慧城市新蓝图》
    43
  • 5
    《智育新篇：点亮学生人工智能伦理与社会责任之光》
    47
  • 6
    《数据主权：人工智能时代的核心基石与挑战》
    33
  • 7
    鸿蒙HarmonyOS应用开发 | 探索 HarmonyOS Next-从开发到实战掌握 HarmonyOS Next 的分布式能力
    110
  • 8
    鸿蒙原生开发环境的创新与性能优化：从工具到跨平台支持的全方位提升
    276
  • 9
    鸿蒙HarmonyOS应用开发 | 「鸿蒙技术分享」HarmonyOS NEXT元服务卡片实战体验
    161
  • 10
    Qwen-Coder：通过Qwen 2.5模型实现智能代码生成的技术实践
    41

    • 相关电子书

    更多
  • 低代码开发师（初级）实战教程
  • 冬季实战营第三期：MySQL数据库进阶实战
  • 阿里巴巴DevOps 最佳实践手册
    • 下一篇
    DataWorks售前咨询