Арифметические команды

@sunny_alice · Регистрация: 13.05.2011

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

Проверьте, пожалуйста, программу на assembler`е

Вот задание: z=x/(12*y-6)+6
Разбиралась несколько часов с арифметическими командами, не уверена, что правильно получается. Пыталась проверить все вручную, еще больше запуталась. Нужно сделать для типа байт и для типа слово.
Пока непонятен один момент: 54h делим на 12h, а в отладчик записывается в ах:1200. Но и остальную часть программы просьба посмотреть на правильность. Заранее благодарю :o

Code
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
title lab3
dat segment
    xb db 54h
    yb db 02h
    xw dw 14h
    yw dw 01h
    zb1 dw 1 dup(?)
    zb2 dw 1 dup(?)
    zw1 dw 1 dup(?)
    zw2 dw 1 dup(?),13,'$'
dat endS
 
cod segment
    assume cs:cod, ds:dat
 start: mov ax,dat
    mov ds,ax
    xor ax,ax
    
 
    mov al,yb
    mov bl,12
    mul bl
    
    xor cx,cx
    mov bx,6
    sub ax,bx
    sbb dx,cx
 
    div xb
    cbw
    
    mov cx,6
    xor bx,bx
    add ax,cx
    adc dx,bx
    mov word ptr zb1,dx
    mov word ptr zb2,ax
 
    mov ax,yw
    mov bx,12
    mul bx
    mov cx,dx
    
    xor cx,cx
    mov bx,6
    sub ax,bx
    sbb dx,cx
 
    div xw
 
    mov cx,6
    xor bx,bx
    add ax,cx
    adc dx,bx
    mov word ptr zw1,dx
    mov word ptr zw2,ax
 
    mov ah,4Ch
    int 21h
cod endS
end start

@zzzyyyxxx · 30.05.2011, 08:01

если правильно всё понял, то вот:

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
;z=x/(12*y-6)+6
dat segment
        xb db 54h
        yb db 02h
        zb db 0
        
        xw dw 14h
        yw dw 01h
        zw dw 0
dat endS 
cod segment
assume cs:cod, ds:dat
 start: mov ax,dat
        mov ds,ax
;1
        mov al,yb
        mov bl,12
        mul bl   
               
        sub ax,6
        
        mov bl,xb
        xchg ax,bx                       ;обмен значениями
        xor dx,dx
        div bx
        
        add ax,6  
        mov zb,al
              
        mov bx,ax           ;вывод рез-та
        call OOO      
        
        mov ah,2                         ;переход на новую строку
        mov dl,0ah
        int 21h  
        
;2
        mov ax,12
        mov bx,yw
        mul bx
        
        sub ax,6
 
        mov bx,xw
        xchg ax,bx
        xor dx,dx
        div bx
        
        add ax,6 
        mov zw,ax        
         mov bx,ax
        call OOO    
 
        mov ah,4Ch
        int 21h
        
 
OOO proc        
 ;вывод рез-та
        mov dl,bh
        and dl,0f0h
        shr dl,4
        call OUT_S
        
        mov dl,bh
        and dl,0fh
        call OUT_S
        
        mov dl,bl
        and dl,0f0h
        shr dl,4
        call OUT_S
        
        mov dl,bl
        and dl,0fh
        call OUT_S      
        
        ret
 OOO endp
        
OUT_S proc      
        cmp dl,9
        jle m1
        add dl,7
m1:
        add dl,30h
        mov ah,2
        int 21h
        ret
OUT_S endp
cod endS
end start

@sunny_alice · 01.06.2011, 00:45 **[ТС]**

Спасибо, но это не то совсем. Как раз тех моментов, в которых я сомневалась, у вас вообще нет. И лишнее не нужно было писать.
Но все равно спасибо за помощь) Ну или за попытку))

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@sunny_alice 0 / 0 / 0 Регистрация: 13.05.2011 Сообщений: 4
	01.06.2011, 00:45 [ТС]
	Спасибо, но это не то совсем. Как раз тех моментов, в которых я сомневалась, у вас вообще нет. И лишнее не нужно было писать. Но все равно спасибо за помощь) Ну или за попытку)) 0