02.10.2006, 15:21
общий
это ответ
Здравствуйте, Глеб!
Размер кода не велик, можно все разместить в одном сегменте (*.com файл, модель - TINY)
----------------/Результат зависит от userv.mac/----------------------------------
include userv.mac
code segment
assume cs: code, ds: data
start:
mov ax,data
mov ds,ax
mov cx,10
mov bx,0
vvodx:
u_key_bin<13,10,‘Vvedite x: ‘>
mov x[bx],ax
add bx,2
dec cx
jcxz sump
jmp vvodx
sump:
mov cx,10
mov bx,0
mov s,0
cikl:
cmp x[bx],0
jle menshe
mov ax,x[bx]
add s,ax
menshe:
add bx,2
loop cikl
mov ax, s
u_show_bin<13,10,‘Summa polojitelnih chisel=‘>
mov ah,4Ch
int 21h
x dw 10 dup(?)
s dw ?
code ends
end start
----------------//----------------------------------
Тогда ключи менять не надо.