|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
24.03.2014, 10:55 | #1 |
Пользователь
Регистрация: 20.10.2012
Сообщений: 26
|
Помогите исправить ошибку
_Data_ SEGMENT ; var
m DB ? ; мощность мн-ва ; m: byte; n DB ? ; размер сочетания ; n: byte; Cmn DD ? ; результат Cmn ; Cmn: dword; Den DW ? ; знаменатель ; Den: word; Fac DW ? ; множитель ; Fac: word; Lim DW ? ; предел цикла ; Lim: word; _Data_ ENDS ; ; _Code_ SEGMENT ; ASSUME DS:_Data_ ; ASSUME SS:_Stack_ ; ASSUME CS:_Code_ ; ; Begin: ; code mov ax, _Data_ ; mov ds, ax ; mov m, 18 ; m := 18; mov n, 8 ; n := 8; mov al, m ; Cmn := m; xor ah, ah ; mov WORD PTR Cmn, ax ; mov WORD PTR Cmn+2, 0 ; mov al, n ; Den := n; xor ah, ah ; mov Den, ax ; mov al, n ; Fac := n; xor ah, ah ; mov Fac, ax ; DenC: ; while Fac > 2 do cmp Fac, 2 ; jbe DenOK ; dec Fac ; Fac := Fac - 1; mov ax, Den ; Den := Den*Fac mul Fac ; mov Den, ax ; jmp DenC ; end; DenOK: ; mov al, m ; Fac := m; xor ah, ah ; mov Fac, ax ; mov al, m ; Lim := m - n + 1; sub al, n ; inc al ; xor ah, ah ; mov Lim, ax ; NumC: ; while Fac > Lim do mov ax, Fac ; cmp ax, Lim ; jbe NumOK ; dec Fac ; Fac := Fac - 1; mov ax, WORD PTR Cmn ; Cmn := Cmn*Fac mul Fac ; mov bx, ax ; mov cx, dx ; mov ax, WORD PTR Cmn+2 ; mul Fac ; add ax, cx ; mov WORD PTR Cmn, bx ; mov WORD PTR Cmn+2, ax ; jmp NumC ; end; NumOK: ; mov ax, WORD PTR Cmn ; Cmn := Cmn/Den mov dx, WORD PTR Cmn+2 ; div Den ; mov WORD PTR Cmn, ax ; mov WORD PTR Cmn, 0 ; ; mov ax, 4C00h ; int 21h ; _Code_ ENDS ; ; END Begin ; end выдает ошибку Undefined symbol:_STACK_ |
24.03.2014, 10:57 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
1) название темы нарушает правила форума
2) код нужно форматировать тегами. |
24.03.2014, 16:56 | #3 | |
Старожил
Регистрация: 15.02.2010
Сообщений: 15,708
|
Цитата:
|
|
24.03.2014, 18:44 | #4 |
Пользователь
Регистрация: 20.10.2012
Сообщений: 26
|
дело в том что я только начинаю изучать ассемблер, и этот код был взят из методички , и как бы в теории его нужно просто откомпилировать и запустить. Но так как он выдает ошибки, я решил попросить помощи. И прошу чтобы вы мне помогли найти и исправить ошибки
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите исправить ошибку | KARUSHEV | Помощь студентам | 9 | 10.09.2009 13:01 |
помогите исправить ошибку | kinza | Помощь студентам | 5 | 09.06.2009 15:27 |
Помогите исправить ошибку! | samuex | Microsoft Office Word | 1 | 24.02.2009 22:05 |
помогите исправить ошибку | Temirlan | Общие вопросы Delphi | 2 | 20.02.2009 18:42 |
Помогите исправить ошибку | Булат | Общие вопросы Delphi | 3 | 25.04.2008 10:01 |