Вычисление сочетаний

@Vladimir08 · Регистрация: 12.10.2014

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

Доброго времени суток. Недавно начал изучать ассемблер. Возникла проблема с процедурами, а точнее с передачей данный в процедуру и изъятия результата. Собственно написал программу, которая считает число сочетаний по формуле c=m!/(n!*(m-n)!). Подскажите где ошибка. Код прилагается для Tasm.

Assembler

model small
.stack 100h
.data
m dw 6
n dw 4             
.code
 
     fact proc                
          pop bx             
          mov dx,bx           
          mov al,0            
          mov ax,dx           
     m0:
          cmp dx,1            
          je m3                
     m1:
          dec dx               
          mul dx              
          jmp m0              
     m3:
          ret                  
                             
     fact endp                
start: 
    mov ax, @data
    mov dx, ax
    mov si,0             
         mov bx, m       
         push bx         
                         
         call fact      
    mov ax,bx            
         mov bx, n       
         push bx         
         call fact      
    div bx               
                          
    xchg ax, bx        
         mov bx, m       
         sub bx, n       
         push bx         
         call fact     
    div bx               
mov ax, 4c00h
    int 21h
end start

@Полный 30h · 28.10.2014, 08:19

Всю программу не разбирал однако предположу что
push bx ; тут ты пытаешся передать параметр в процедуру через стек

call fact ; а тут вызываешь саму процедуру, не беря во внимание то, что сверху на засунутый в стек параметр команда call пихает адрес возврата

fact proc ; и когда переходишь к процедуре
pop bx ; то достаёшь из стека не параметр, а адрес, на который после завершения процедуры должна вернуться программа.

Вот эта связка вообще гон какой то, зачем в al пихать ноль если следующей командой этот ноль всё равно затрётся содержимым dx?
mov al,0
mov ax,dx

Как то так

@Mikl___ · 28.10.2014, 08:28

Vladimir08,
посмотри https://www.cyberforum.ru/asse... 05284.html $https://www.cyberforum.ru/cgi-bin/latex.cgi?\rightarrow$ "Глава 15. ПОДПРОГРАММЫ-ПРОЦЕДУРЫ" $https://www.cyberforum.ru/cgi-bin/latex.cgi?\rightarrow$ "Передача параметров процедуре"

@Vladimir08 · 28.10.2014, 08:35 **[ТС]**

Всем спасибо за советы. Вроде понял. Буду пробовать.

@Полный 30h Эксперт быдлокодинга 2091 / 525 / 69 Регистрация: 04.11.2010 Сообщений: 1,310
	28.10.2014, 08:19	2
	Всю программу не разбирал однако предположу что push bx ; тут ты пытаешся передать параметр в процедуру через стек call fact ; а тут вызываешь саму процедуру, не беря во внимание то, что сверху на засунутый в стек параметр команда call пихает адрес возврата fact proc ; и когда переходишь к процедуре pop bx ; то достаёшь из стека не параметр, а адрес, на который после завершения процедуры должна вернуться программа. Вот эта связка вообще гон какой то, зачем в al пихать ноль если следующей командой этот ноль всё равно затрётся содержимым dx? mov al,0 mov ax,dx Как то так 1

@Mikl___ Ушел с форума 16279 / 7604 / 1065 Регистрация: 11.11.2010 Сообщений: 13,617
	28.10.2014, 08:28	3
	Vladimir08, посмотри https://www.cyberforum.ru/asse... 05284.html $https://www.cyberforum.ru/cgi-bin/latex.cgi?\rightarrow$ "Глава 15. ПОДПРОГРАММЫ-ПРОЦЕДУРЫ" $https://www.cyberforum.ru/cgi-bin/latex.cgi?\rightarrow$ "Передача параметров процедуре" 1

@Vladimir08 0 / 0 / 1 Регистрация: 12.10.2014 Сообщений: 14
	28.10.2014, 08:35 [ТС]	4
	Всем спасибо за советы. Вроде понял. Буду пробовать. 0