В слове определить разность между количеством нулевых битов в младшем и старшем байте.
>>Заранее спасибо<<
http://www.studfiles.ru/dir/cat32/subj79/file2329/view3328.html
Добавлено через 10 мин.
В принципе, оттуда только код подсчет нужен. Я его проверил. Работает.
label
move;
var
counter,slovo : word;
mlbyte,stbyte : byte;
begin
slovo:=127;
mlbyte:=lo(slovo);
stbyte:=hi(slovo);
asm
mov Ah,mlbyte
mov bx,0
mov cx,8
move:
sal ah,1 //;move highest bit in AX to CF
adc bl,0
loop move
mov counter,bx
end;
writeln(counter);
readln;
end.
спасибо))