С Новым годом! Форум программистов, компьютерный форум, киберфорум
Assembler, MASM, TASM
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
29 / 29 / 7
Регистрация: 26.03.2010
Сообщений: 305
1

Разобрать программу

10.09.2011, 16:48. Показов 1879. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Всем доброе время суток! У меня есть такое задание:
Многочлен степени n задается своими коэффициентами, каждый из которых записан в своем поле структуры «многочлен». Реализуйте сложение, вычитание и умножение многочленов.
Есть написанная программа. Помогите разобрать, т.е. закоментировать все, что бы понятно было мне, заранее спасибо
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
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
;Program: 4.3
;
;Сложение, вычитание и умножение многочленов
;Максимальная степень задается в переменной N
;Коэффициенты беззнаковые <=65536
;
.model small
.stack 100h
.data
N equ 256
polynom struc
coef dw N dup (0)
polynom ends
polynom_big struc
coef dw N*2 dup (0)
polynom_big ends
polynom1 polynom <>
polynom2 polynom <>
temp polynom_big <>
_buff dw ?
pol dw ?
action db ?
mess_input db 'Enter polynom degree: $'
mess_input2 db 'Enter x^$'
mess_output db 'x^$'
mess_menu db 'Choose action:',0Dh,0Ah,'1.Addiction',0Dh,0Ah,'2.Subtraction',0Dh,0Ah,'3.Multiplication',0Dh,0Ah,'$'
mess_cont db 'Continue? [Y/N]$'
mess_cont1 db 'New polynoms? [Y/N]$'
.code
PUBLIC ReadInteger, WriteInteger, ReadChar, WriteChar
;Процедуры для ввода и вывода чисел
ReadInteger proc  
    push    cx
    push    bx
    xor     cx, cx
    mov     bx, 10
read:  
    call    ReadChar
    cmp     al, '0'
    jb      done
    cmp     al, '9'
    ja      done  
    sub     al, '0'  
    xor     ah, ah  
    xor     dx, dx
    xchg    cx, ax  
    mul     bx  
    add     ax, cx  
    xchg    ax, cx  
    jmp     short read  
done:  
    xchg    ax, cx  
    pop     bx  
    pop     cx 
    ret  
ReadInteger endp
  
ReadChar proc 
    mov     ah, 1
    int     21h
    ret 
ReadChar endp  
 
WriteInteger proc  
    push    ax  
    push    cx  
    push    bx  
    push    dx  
 
    xor     cx, cx  
    mov     bx, 10  
divloop:  
    xor     dx, dx  
    div     bx  
    push    dx  
    inc     cx  
    cmp     ax,0
    jnz     divloop  
poploop:  
    pop     ax  
    add     al, '0'  
    call    WriteChar  
    loop    poploop  
 
    pop     dx
    pop     bx  
    pop     cx  
    pop     ax 
    ret  
WriteInteger endp  
  
WriteChar proc  
    push    ax  
    push    dx  
    mov     dl, al  
    mov     ah, 2  
    int     21h  
    pop     dx  
    pop     ax  
    ret  
WriteChar endp
 
;Процедура ввода многочлена
input_polynom proc
    mov dx,offset mess_input    ;Выводим сообщение
    xor ax,ax
    mov ah,09h
    int 21h
    call ReadInteger    ;Вводим степень многочлена в _buff
    mov _buff,ax
    mov dx,0D0Ah
    mov ah,02h
    int 21h
    mov cx,_buff    ;Цикл по степени многочлена+1
    inc cx
input_coef:
    mov dx,offset mess_input2   ;Выводим сообщение X^
    mov ah,09h
    int 21h
    mov ax,cx
    dec ax
    call WriteInteger   ;Пишем степень X
    mov dx,3Ah  ;Ставим : ...
    mov ah,02h
    int 21h
    mov dx,20h  ;и пробел
    int 21h
    call ReadInteger    ;Вводим число
    xor bx,bx
    mov bx,pol
    add bx,cx   ;добавляем к адресу переменной смещение = степень*2
    add bx,cx
    mov [bx],ax ;и записываем его в переменную, адрес которой в переменной pol
    mov ah,02h
    mov dx,0D0Ah
    int 21h
    loop input_coef
    ret
input_polynom endp
;Процедура печати многочлена
print_polynom proc
    mov cx,N-1
    cmp pol,offset temp ;Если печатается temp - cx=N*2-1 т.к. temp больше в 2 раза
    jne l3
    add cx,N
    l3:
    mov bx,pol  ;В bx адрес многочлена
    add bx,cx   ;И смещение в конец, т.к. печатаем с конца
    add bx,cx
print_coef: ;Цикл по многочлену, cx=степень-1
    mov ax,[bx]
    cmp ax,0    ;Если коэффициент=0 не печатаем
    je loop_end
    call WriteInteger
    cmp cx,1    ;Если степень=0, заканчиваем цикл ...
    je loop_end
    mov dx,offset mess_output ;Иначе печатаем X^(степень)
    mov ah,09h
    int 21h
    mov ax,cx
    dec ax
    call WriteInteger
    mov dx,2Bh ;Печатаем +
    mov ah,02h
    int 21h
loop_end:
    sub bx,2    ;Смещаемся на следующий коэффициент
    loop print_coef
    mov dx,0D0Ah
    mov ah,02h
    int 21h
    ret
print_polynom endp
;Процедура сложения многочленов
addict_polynom proc
    mov cx,N-1 ;cx=максимальная степень многочлена-1
    xor si,si
    xor dx,dx
addict: ;Цикл по многочлену
    mov temp.coef[si],0 ;Записываем в temp ноль
    mov dx,polynom1.coef[si]    ;В dx коэффициент первого многочлена
    add dx,polynom2.coef[si]    ;В dx прибавляем коэффициент второго многочлена
    add temp.coef[si],dx    ;Записываем сумму в temp
    add si,2
    loop addict
    ret
addict_polynom endp
;Процедура вычитания многочленов
subtr_polynom proc
    mov cx,N-1
    xor si,si
    xor dx,dx
subtr:
    mov temp.coef[si],0
    mov dx,polynom1.coef[si]
    sub dx,polynom2.coef[si]    ;Отличается от сложения только этой строкой
    add temp.coef[si],dx
    add si,2
    loop subtr
    ret
subtr_polynom endp
;Процедура умножения многочленов
mul_polynom proc
    mov cx,(N*2)-1
    xor si,si
prepare:    ;Обнуление многочлена temp т.к. там может быть мусор
    mov temp.coef[si],0
    add si,2
    loop prepare
    xor si,si   ;si - индекс в первом многочлене
multloop:   ;Цикл по первому многочлену
    xor ax,ax
    mov cx,N-1  ;cx=степень-1
    xor bx,bx
mult:   ;Вложенный цикл по второму многочлену
    mov ax,polynom1.coef[si]    ;В ax коэффициент первого многочлена
    mul polynom2.coef[bx]   ;Умножаем на коэффициент второго
    add temp.coef[si][bx-2],ax  ;Записываем в temp где степень=степень1+степень2
    add bx,2
    loop mult
    add si,2
    cmp si,(N-1)*2  ;Если дошли до конца многочлена - конец
    jl multloop
    ret
mul_polynom endp
 
main:
    mov ax,DGROUP
    mov ds,ax
input:
    mov pol,offset polynom1 ;Пишем в pol адрес первого многочлена
    call input_polynom  ;И вводим его
    call print_polynom  ;Печатаем
    mov pol,offset polynom2 ;То же самое для второго
    call input_polynom
    call print_polynom
menu:
    mov dx,offset mess_menu ;Выводим меню
    mov ah,09h
    int 21h
    mov ah,07h
    int 21h
    mov action,al
    cmp action,'2'  ;Сравниваем выбор
    jl addictl  ;Если <2 - сложение
    je subtrl   ;=2 - вычитание
    jg multl    ;>2 - умножение
    jmp menu
    addictl: call addict_polynom
    jmp print_result
    subtrl: call subtr_polynom
    jmp print_result
    multl: call mul_polynom
    jmp print_result
print_result:
    mov dx,0D0Ah
    mov ah,02h
    int 21h
    mov pol,offset polynom1 ;Печатаем первый многочлен
    call print_polynom
    cmp action,'2'  ;Печатаем знак в зависимости от действия
    jl plus
    je minus
    jg multiply
    plus: mov dx,'+'
    jmp l1
    minus: mov dx,'-'
    jmp l1
    multiply: mov dx,'*'
    jmp l1
    l1:
    mov ah,02h
    int 21h
    mov dx,0D0Ah
    int 21h
    mov pol,offset polynom2 ;Печатаем второй многочлен
    call print_polynom
    mov dx,'='  ;Печатаем =
    mov ah,02h
    int 21h
    mov dx,0D0Ah
    int 21h
    mov pol,offset temp ;Печатаем результат
    call print_polynom
    mov dx,offset mess_cont ;Спрашиваем надо ли продолжать
    mov ah,09h
    int 21h
    mov ah,07h
    int 21h
    cmp al,'N'  ;Если N - выход
    je main_end
    cmp al,'n'  ;Если n - выход
    je main_end
    mov dx,0D0Ah
    mov ah,02h
    int 21h
    mov dx,offset mess_cont1    ;Спрашиваем надо ли вводить новые многочлены
    mov ah,09h
    int 21h
    mov ah,07h
    int 21h
    cmp al,'N' ;Если N - переход к меню
    je l2
    cmp al,'n'  ;Если n - переход к меню
    je l2
    mov dx,0D0Ah
    mov ah,02h
    int 21h
    jmp input   ;Иначе переход к вводу многочленов
    l2:     ;Перевод строки и прыжок на меню
    mov dx,0D0Ah
    mov ah,02h
    int 21h
    jmp menu
    main_end:   ;Завершение программы
    mov ah,4Ch
    int 21h
end main
вроде та программа.

Добавлено через 1 минуту
Больше всего не понятно начало
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
10.09.2011, 16:48
Ответы с готовыми решениями:

разобрать программу
Удалено вложение, содержащее вирус!

разобрать программу
Помогите пожалуйста с решение задач. 1)В строке символов находятся двухзначные числа, найти...

Необходимо разобрать программу
Добрый день . встретились такие операторы как&quot;ch+=(char) 32&quot; и &quot;ch-=(char) 32&quot; Объясните принцип...

Разобрать программу по теории Пирсона
Доброго времени суток. Сдал первую лабу по методу Монте-Карло.. Вторая лаба Цель работы: изучить...

1
60 / 40 / 30
Регистрация: 26.05.2011
Сообщений: 92
11.09.2011, 10:52 2
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
.data ; Сегмент данных
N equ 256 ;  N=256 (константа)
polynom struc ; Структура, описывающая полином
coef dw N dup (0) ; Массив коэффициентов полинома
polynom ends ;
polynom_big struc ; Структура, состоящая из 2*N коэф.полинома
coef dw N*2 dup (0)
polynom_big ends
polynom1 polynom <> ; Неинициализированная переменная polynom1 типа polynom
polynom2 polynom <> ; Неинициализированная переменная polynom2 типа polynom
temp polynom_big <> ; Неинициализированная переменная типа polynom_big
_buff dw ? ; Переменные программы
pol dw ? ;
action db ? ;
mess_input db 'Enter polynom degree: $'
mess_input2 db 'Enter x^$'
mess_output db 'x^$'
mess_menu db 'Choose action:',0Dh,0Ah,'1.Addiction',0Dh,0Ah,'2.Subtraction',0Dh,0Ah,'3.Multiplication',0Dh,0Ah,'$'
mess_cont db 'Continue? [Y/N]$'
mess_cont1 db 'New polynoms? [Y/N]$'
1
11.09.2011, 10:52
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
11.09.2011, 10:52
Помогаю со студенческими работами здесь

Разобрать программу подсчета символов
#include &lt;stdio.h&gt; main() { long c, nc; nc = 0; while ((c = getchar()) != EOF) ...

Нужно разобрать программу по строкам
Задача: Найти количество вхождений в массив значения Х. Элементы массива и Х задаются с клавиатуры....

Разобрать программу перевода в различные системы счисления
Здравствуйте.Вопрос такой:Есть задача написать программу для перевода из 16сс(системы счисления) в...

Подскажите пожалуйста подробнее разобрать и понять программу
Почему выводит сначала -199 а только потом 10


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Использование GraphQL в Go (Golang)
InfoMaster 08.01.2025
Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор?
Alexander-7 08.01.2025
Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .
Как работать с GraphQL на TypeScript
InfoMaster 08.01.2025
Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .
Счётчик на базе сумматоров + регистров и генератора сигналов согласования.
Hrethgir 07.01.2025
Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
Полезные поделки на Arduino, которые можно сделать самому
raxper 06.01.2025
Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .
Подборка решений задач на Python
IT_Exp 06.01.2025
Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .
С чего начать программировать микроконтроллер­­ы
raxper 06.01.2025
Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .
Из чего собрать игровой компьютер
inter-admin 06.01.2025
Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .
Обновление сайта www.historian.b­y
Reglage 05.01.2025
Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru