VPF::Найти количество нулей в заданном массиве 6 байт

melie

Дата 22.2.2011, 08:50 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 22.2.2011

Репутация: нет
Всего: нет

Приветик Всем!!!
Ребята, помогите кто-нибудь решить задачку, а то сколько не пыталась - ничего не получается, а зачет нужен)))
Дан массив из 6 байт. Рассматривая его, как массив из 48 бит, посчитать в нём количество нулей.
Очень признательна заранее!!! smile

500mhz

Дата 22.2.2011, 12:32 (ссылка)

(нет голосов)

Загрузка ...

шайтан

Профиль
Группа: Завсегдатай
Сообщений: 1017
Регистрация: 5.5.2008
Где: Киев / Italy

Репутация: 1
Всего: 14

нулей всмысле байт или нулей в смысле бит?

--------------------

iff

Дата 22.2.2011, 13:30 (ссылка)

(нет голосов)

Загрузка ...

Администратор

Профиль
Группа: Участник
Сообщений: 949
Регистрация: 23.3.2007

Репутация: 4
Всего: 16

500mhz,

Цитата

Рассматривая его, как массив из 48 бит

------------

Готов выполнить

--------------------

DOS... Синей пеленой экран заполнил чистый DOS
Мышь... Стала вдруг квадратной, потеряла форму мышь...
Я разбил окно, девяностопятое мастдайное окно,
И поставил DOS, и тогда увидел: Это счастье, — вот оно.

Игорь1024

Дата 22.2.2011, 13:31 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 151
Регистрация: 11.5.2009
Где: Дальний Восток

Репутация: нет
Всего: нет

Может как-то так...

Код


org 100h

mov cx, 6
mov si, out_r
loop count
ret
count:
      lodsb
      xchg ah, al
      mov si, 8
      loop byte_h
      mov cx, word[index]
      dec [index]
      ret

byte_h:
        bt  ax, 0
        shl ax, 1
        jnc inc_r
        ret
inc_r:
        inc [out_r]
        ret


inp   db 6 dup(0)
out_r db 0
index db 6

Добавлено через 8 минут и 4 секунды
Хотя что-то с ret'ами намудрил.

Это сообщение отредактировал(а) Игорь1024 - 22.2.2011, 13:35

--------------------

The God is real,unless he is declared as integer.

500mhz

Дата 22.2.2011, 14:50 (ссылка)

(нет голосов)

Загрузка ...

шайтан

Профиль
Группа: Завсегдатай
Сообщений: 1017
Регистрация: 5.5.2008
Где: Киев / Italy

Репутация: 1
Всего: 14

Код


format PE
include 'win32axp.inc'
start:

        stdcall Calc,table
        invoke ExitProcess,0

proc Calc,var
        xor ebx,ebx
        mov esi,[var]
        mov ecx,0x6
.main:
        push ecx
        mov ecx,8
        lodsb
.one:
        bt eax,0
        jnc .zero
        shr eax,1
        loop .one
        jmp .next
.zero:
        inc ebx
        shr eax,1
        loop .one
.next:
        pop ecx
        loop .main
        ret
endp



table:
        db 0x34,0x5,0xf8,0xd1,0x98,0x1


.end start

--------------------

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Asm для начинающих \| Следующая тема »