Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.09.2015, 21:52   #11
R71MT
Участник клуба
 
Аватар для R71MT
 
Регистрация: 16.06.2011
Сообщений: 1,428
По умолчанию

Цитата:
Сообщение от kucher69 Посмотреть сообщение
Найти максимальный повторяющийся элемент
..дал-же тебе f.hump вариант.. Чем не подходит?
Нашедшего выход - затаптывают первым..
R71MT вне форума Ответить с цитированием
Старый 20.09.2015, 22:08   #12
kucher69
Пользователь
 
Регистрация: 16.09.2015
Сообщений: 21
По умолчанию

всё решил проблему путём
Код:
    ;delLessSignWord
    LEA   DI,dwArray 
    MOV   SI,DI
    MOV   CX,dwDimenArray
    XOR   BX, BX      ; Number of array elements >= number for comparison
delloop:
    LODSW               ; AX = DS:[SI], SI = SI + 2
    CMP   DX, AX        ; Compare AX and DX (AX - DX)
    JG    nextword      ; If AX < DX goto nextword
    STOSW               ; ES:[DI] = AX, DI = DI + 2
    INC   BX            ; BX = BX + 1
nextword:
    LOOP  delloop       ; CX = CX - 1, if CX > 0 goto delloop
    MOV   kol, BX
в DX лежит max элемент
ВСЕМ СПАСИБО ЗА ОКАЗАННУЮ ПОМОЩЬ!
kucher69 вне форума Ответить с цитированием
Старый 20.09.2015, 22:20   #13
R71MT
Участник клуба
 
Аватар для R71MT
 
Регистрация: 16.06.2011
Сообщений: 1,428
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Только переписыванием в новый массив.
..каждый элемент масива проверяй/пиши stosb, путь ищет потом по адресу DI Весь массив будет лежать там. .. как вариант
Нашедшего выход - затаптывают первым..
R71MT вне форума Ответить с цитированием
Старый 20.09.2015, 22:26   #14
kucher69
Пользователь
 
Регистрация: 16.09.2015
Сообщений: 21
По умолчанию

Цитата:
Сообщение от R71MT Посмотреть сообщение
..каждый элемент масива проверяй/пиши stosb, путь ищет потом по адресу DI Весь массив будет лежать там. .. как вариант
не зачем)
вот исправил в коде
Код:
    ;delLessSignWord
    LEA   DI,dwArray 
    MOV   SI,DI
    MOV   CX,dwDimenArray
    XOR   BX, BX      ; Number of array elements >= number for comparison
delloop:
    LODSW               ; AX = DS:[SI], SI = SI + 2
    CMP   AX, DX        ; Compare AX and DX (AX - DX)
    JE    nextword      ; If AX < DX goto nextword
    STOSW               ; ES:[DI] = AX, DI = DI + 2
    INC   BX            ; BX = BX + 1
nextword:
    LOOP  delloop       ; CX = CX - 1, if CX > 0 goto delloop
    MOV   kol, BX
kucher69 вне форума Ответить с цитированием
Старый 20.09.2015, 22:26   #15
kucher69
Пользователь
 
Регистрация: 16.09.2015
Сообщений: 21
По умолчанию

Всем спасибо за оказанную помощь !
kucher69 вне форума Ответить с цитированием
Старый 20.09.2015, 22:45   #16
R71MT
Участник клуба
 
Аватар для R71MT
 
Регистрация: 16.06.2011
Сообщений: 1,428
По умолчанию

....кривой код получился
Нашедшего выход - затаптывают первым..

Последний раз редактировалось R71MT; 20.09.2015 в 22:52.
R71MT вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти максимальный элемент maxim1592 Паскаль, Turbo Pascal, PascalABC.NET 5 28.05.2014 19:37
создать массив по формуле,найти максимальный элемент. отсортировать по уменьшению,последний отрицательн элемент заменить наиболшим сергей-верига Помощь студентам 2 16.01.2014 15:25
найти максимальный элемент на языке си istavzev Помощь студентам 4 05.04.2012 19:32
Массив. Найти максимальный элемент perojenko Помощь студентам 6 22.06.2009 22:36