VPF::[ASM] Массивы - Форум программистов

kuzzmi

Дата 29.12.2009, 01:37 (ссылка)

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

Загрузка ...

Новичок

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

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

Постановка задачи:
В заданном массиве A[n] (n>2) найти 3 максимальных элемента. Сжать массив, удалив эти максимальные элементы.

Идеи:

Код


.MODEL SMALL
.STACK 64
.DATA
    N=5
    FRST    DW ?
    MAXN    DW ?
    MAXQ    DW 3
    A DW N DUP(?)

.CODE
    EXTRN WRITER: NEAR
    EXTRN READ: NEAR

.STARTUP

    MOV SI,0    ;чистим индексный регистр
    MOV CX,N    ;запоминаем для цикла размер массива    
R:
    CALL READ       ;
        MOV A[SI],AX    ;
    INC SI        ;читаем массив
    INC SI        ;
    LOOP R        ;
Z:                                                             
    MOV SI,0    ;чистим индексный регистр
    MOV AX,A[SI]    ;предполагаем, что первый элемент - первый максимальный
    MOV FRST,AX
    MOV MAXN,0    ;номер максимального элемента, предположительно, = 0
    MOV CX,N    ;запоминаем для цикла размер массива
    MOV AX, MAXQ    ;проверяем, удалили ли мы все 3 максимальных элемента
    CMP AX, 0    ;если нет, то ищем максимальный элемент и удаляем его
    JE  OUTPUT    ;иначе выводим полученный массив на экран
LP1:    
    MOV AX,A[SI]    ;берём элемент массива
    CMP AX,FRST    ;сравниваем с максимальным
    JNG NEXT    ;если меньше - идем дальше
    MOV MAXN,SI    ;иначе - запоминаем номер максимального
    MOV AX,A[SI]    ;запоминаем и его значение
    MOV FRST,AX
    DEC MAXQ    ;вычетаем единицу из счетчика максимальных элементов

NEXT:
    INC SI        ;
    INC SI        ;следующий виток цикла
    LOOP LP1    ;

    MOV AX,FRST
    CALL WRITER
    CALL READ

REMV:
    DEC CX        ;уменьшаем количество шагов на один для последнего элемента
    MOV SI,MAXN
    LP: MOV AX,A[SI+2]    ;берём следующий элемент
    MOV A[SI],AX    ;заменяем его
    INC SI        
    INC SI
    LOOP LP
    MOV DI,N    ;берём номер последнего элемента массива
    DEC DI        ;вычитаем единицу ввиду нумерации не с нуля
    SHL DI,1    ;умножаем на два для получения адреса
    MOV A[DI],0    ;обнуляем последний элемент

    JMP Z        ;возвращаемся наверх

OUTPUT:
    MOV SI,0    ;чистим индексный регистр
    MOV CX,N    ;запоминаем для цикла размер массива    
   F:
    MOV AX,A[SI]    ;
        CALL WRITER    ;
    INC SI        ;выводим массив
    INC SI        ;
    LOOP F        ;
call read

.EXIT
END

Что получается:

ввод массива
поиск и вывод максимального элемента 3 раза
вывод "измененного" массива

Что не получается:

удаление элемента путем смещения
освободившиеся элементы массива заменить нулем

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