проверка четности

@medved_julia · Регистрация: 15.11.2010

Студворк — интернет-сервис помощи студентам

необходимо ввести числа больше ста, вывести на экран те, которые четные. у меня выдает ошибку при компиляции. что не правильно? подскажите, пожалуйста!!!

Assembler
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
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
masm            
model small     
stack 256
 
.data
mesg1   db 'Vvedite znachenia A,B,C,D,E: $'
buff    db 6,7 dup (?)
mas dw 5 dup (0)
mas_B   dw 5 dup (0)
cc  db 10
i   dw 0
one     db 2
two     db 0
l       db 0
.code
start:
    mov ax, @data       
    mov ds, ax
 
    xor ax, ax
    xor si, si
    mov i, 0
 
    mov cx, 5
 
vvod:
    mov ah, 0ah
    xor di, di
    mov dx, offset buff     
    int 21h         
    mov dl, 0ah
    mov ah, 02
    int 21h         
                        
        mov si, offset buff+2       
        cmp byte ptr [si], "-"      
        jnz ii1
        mov di, 1           
        inc si              
 
ii1:
        xor ax, ax
 
ii2:
        mov bl, [si]        
        cmp bl, 0dh         
        jz  endin
                        
        
 
        sub bl, '0'         
        mul cc          
        add ax, bx          
        inc si              
        jmp ii2             
 
 
 
 
endin:
        cmp di, 1           
        jne ii3
        neg ax          
 
ii3:
    xor bx, bx
    mov bx, i
    mov mas[bx], ax
    inc i
    inc i
    loop    vvod
 
    mov cx, 5
    xor si, si
    xor ax, ax
    xor dx, dx
    xor bx, bx
    mov     si,0    
    
 
cycl:  mov dx,one
    mov ax, mas[si]
    idiv dx
    cmp dx,two
    je m2
  
                
 
m1:
    inc si
    inc si          
    loop    cycl
 
m2:     mov bx, l                           
    mov mas_B[bx], ax
    inc l
    inc l
    jmp     m1
 
    
 
show:                        
    mov bx, mas_B[di]
    mov dl, bl
    add dl, 30h
    mov ah, 02h
    int 21h
    inc di
    inc di
    loop    show
 
    mov ah, 01h                       
    int 21h
 
exit:           
    mov ax, 4c00h       
    int 21h         
    end start

@Mikl___ · 26.11.2010, 05:03

medved_julia, а указывать тип ошибки, строки на которые ругается компилятор кто будет?

@vital792 · 26.11.2010, 08:30

первое что бросилось в глаза

Сообщение от medved_julia

cycl: *mov dx,one
* * * * mov ax, mas[si]
* * * * idiv dx
* * * * cmp dx,two
* * * * je m2

one и two определены как db соответственно их нельзя загрузить в 16 битный регистр dx (и сравнивать тоже нельзя)

@medved_julia · 26.11.2010, 11:03 **[ТС]**

спасибо огромное!!!
я поменяла one, two, l на dw. программа запускается, но выдает ошибку деления на ноль! где искать эту самую ошибку?

@Mikl___ · 26.11.2010, 12:08

Сообщение от medved_julia

программа запускается, но выдает ошибку деления на ноль! где искать эту самую ошибку?

cycl: mov dx,one
mov ax, mas[si]
idiv dx
замени на cycl: mov dx,0
mov bx,one
mov ax, mas[si]
idiv bx; число в dx:аx делится на bx

@medved_julia · 26.11.2010, 12:18 **[ТС]**

опять ругается на
idiv bx
как еще возможно это исправить?

@Mikl___ · 26.11.2010, 13:11

medved_julia, ты внимательно прочитала пост #5 или просто поменяла dx на bx?

@medved_julia · 26.11.2010, 17:23 **[ТС]**

изменила код как смогла, но теперь мне выводит в ответе четыре нуля всегда, независимо от введенных данных!!!

Assembler
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
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
masm            
model small     
stack 256
 
.data
mesg1   db 'Vvedite znachenia A,B,C,D,E: $'
buff    db 6,7 dup (?)
mas dw 5 dup (0)
mas_B   dw 5 dup (0)
cc  dw 10
i   dw 0
one     dw 2
two     dw 0
l       dw 0
.code
start:
    mov ax, @data       
    mov ds, ax
 
    xor ax, ax
    xor si, si
    mov i, 0
 
    mov cx, 5
 
vvod:
    mov ah, 0ah
    xor di, di
    mov dx, offset buff     
    int 21h         
    mov dl, 0ah
    mov ah, 02
    int 21h         
                        
        mov si, offset buff+2       
        cmp byte ptr [si], "-"      
        jnz ii1
        mov di, 1           
        inc si              
 
ii1:
        xor ax, ax
 
ii2:
        mov bl, [si]        
        cmp bl, 0dh         
        jz  endin
                        
        
 
        sub bl, '0'         
        mul cc              
        add ax, bx          
        inc si              
        jmp ii2             
 
 
 
 
endin:
        cmp di, 1           
        jne ii3
        neg ax          
 
ii3:
    xor bx, bx
    mov bx, i
    mov mas[bx], ax
    inc i
    inc i
    loop    vvod
 
    mov cx, 5
    xor si, si
    xor ax, ax
    xor dx, dx
    xor bx, bx
    mov     si,0    
    
    
cycl:   mov dx,0
    mov bx,one
    mov ax, mas[si]
    idiv bx
    cmp dx,two
    je m2
    loop show
                
 
;m1:
    ;inc    si
    ;inc    si          
    ;loop   cycl
 
m2:     mov bx, l 
    mov     ax, mas[si]                          
    mov mas_B[bx], ax
    inc l
    inc l
    
    inc si
    inc si          
    loop    cycl
 
    mov     cx,5
    mov si,0
 
show:   
    xor     bx,bx                   
    mov bx, mas_B[si]
    mov dl, bl
    add dl, 30h
    mov ah, 02h
    int 21h
    inc di
    inc di
    loop    show
 
    mov ah, 01h                    
    int 21h
 
exit:           
    mov ax, 4c00h       
    int 21h         
    end start

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

@Mikl___ Ушел с форума 16373 / 7685 / 1080 Регистрация: 11.11.2010 Сообщений: 13,759
	26.11.2010, 05:03
	medved_julia, а указывать тип ошибки, строки на которые ругается компилятор кто будет? 0

@medved_julia 0 / 0 / 0 Регистрация: 15.11.2010 Сообщений: 7
	26.11.2010, 11:03 [ТС]
	спасибо огромное!!! я поменяла one, two, l на dw. программа запускается, но выдает ошибку деления на ноль! где искать эту самую ошибку? 0

@medved_julia 0 / 0 / 0 Регистрация: 15.11.2010 Сообщений: 7
	26.11.2010, 12:18 [ТС]
	опять ругается на idiv bx как еще возможно это исправить? 0

@Mikl___ Ушел с форума 16373 / 7685 / 1080 Регистрация: 11.11.2010 Сообщений: 13,759
	26.11.2010, 13:11
	medved_julia, ты внимательно прочитала пост #5 или просто поменяла dx на bx? 0