jueves, 28 de febrero de 2019

Edad Mayor o Menor

Código:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
org 100h
.model small
.stack 64 ; segmento de pila

.data
diez db 10;variable
num1 db 0;variable para edad
mens db 'Ingrese la edad: $'
mens1 db ' Eres Mayor de Edad $'
mens2 db ' Eres Menor de Edad $'

.code

    inicio proc far
        mov ax,@data ;direccionamiento
        mov ds,ax ;los datos de mueve
        ;poner el primer letrero
        mov ah,09
        lea dx,mens
        int 21h
        
        mov ah,01
        int 21h
        sub al,30h ;convertir a valor
        mul diez
        mov num1,al
        
        mov ah,01
        int 21h
        sub al,30h
        add num1,al
        mov al,num1
        
        cmp al,18
        jge mayor
        jmp menor
        
        mayor:
            mov ah,09
            lea dx,mens1
            int 21h
            jmp fin
                   
        menor:
            mov ah,09
            lea dx,mens2
            int 21h
            jmp fin
            
        fin:
            mov ax,4c00h
        
    endp
end





No hay comentarios:

Publicar un comentario