Форум программистов, компьютерный форум, киберфорум
Assembler для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
0 / 0 / 1
Регистрация: 01.05.2017
Сообщений: 10
1
FASM

Подсчет суммы элементов массива после установки 1 в четвертом бите каждого элемента. Проблемы с выводом в консоль

20.03.2020, 13:52. Просмотров 983. Ответов 5
Метки нет (Все метки)

Форумчане! Помогите!

Необходимо написать код, который позволяет установить "1" в четвертых битах всех элементов массива из 10 байтов. Определить сумму элементов полученного массива.

Мне удалось составить макет (скелет) кода и используя интернет составить следующий код:

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
.code32
 
; .model 
 
.stack 100h                                         ; размер стека - 256 байт
 
.data
A db 17, -41, 71, 123, 2, -23, -17, 42, 73, -60                                 ; массив однобайтовый
N db $-A                                                ; размер массива
Sum db 0                                                ; сумма, объявлена нулем
 
Msg0 db 13,10,0                                     ; перевод строки
Msg1 db "Source array: ", 14,10,0
Msg2 db "Destination array: ",18,10,0
Msg3 db "Sum: "
 
 
.code
_start:
    mov ebx, data                                       ; кладем в базовый регистр 
    mov ecx, 10                                     ; регистр-счетчик
    mov ax, 0
    m1:
        mov al, [ebx]                                   ; выбор текущего элемента массива
        or al, 00010000b                                ; умножение с использованием маски
        mov [ebx], al                                   ; сохраняем результат
        add sum, [ebx]                                  ; суммирование
        ; inx ebx                                       ; инкремент (счетчика элемента массива)
        loop m1                                         ; переход в начало цикла
 
        ; вывод на экран сообщение из Message
        mov ds, ebx                                 ; в ds необходимо положить номер сегмента памяти, в котором находится выводимая строка
        mov dx, offset Message                          ; записали смещение Message                 
        mov ah, 9h                                      
        int 21h
 
        mov ah, 8h                                  ; ждем нажатия клавиши в консоли
        int 21h
 
        ; корректный выход из кода
        mov ah, 4Ch
        mov al, 00h
        int 21h
 
end _start
Но, не могу понять, как можно в Message внести Msg1 + значения из массива до обработки + Msg2 + значения из массива после обработки + Msg3 + значение суммы

Не факт конечно, что я правильно написал код, поэтому, если найдете ошибки - сообщите пожалуйста.

Буду рад любой полезной информации касательно моей темы.
(с ассемблером на "Вы" - пока делаю попытки его изучить в рамках заданий универа...)
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.03.2020, 13:52
Ответы с готовыми решениями:

Задание массива 3-хзначных чисел, запись в файл и и подсчет суммы цифр каждого элемента
Примерно задание трактуется так: 1. Задать массив (не случайный, вручную) 3-хзначных чисел. 2....

Динамические массивы: подсчет суммы элементов после минимального по модулю элемента
Добрый день всем! Прошу помощи - не могу найти ошибку в коде, неправильно считает сумму...

Дополнить программу подсчетом количества замен, поиском суммы элементов массива в четвертом столбце
Здравствуйте, помогите дополнить программу: подсчетом количества замен, поиском суммы элементов...

проблемы с выводом элемента массива
Не выводится индекс второго положительного элемента массива #include <iostream> #include...

5
Модератор
Эксперт по электронике
7340 / 3568 / 1412
Регистрация: 01.02.2015
Сообщений: 11,164
Записей в блоге: 1
20.03.2020, 20:27 2
У вас смесь кода для 16- и 32-разрядного режима процессора.

Значение массива выводят по одному числу. Вывод числа рассмотрен в закреплённой теме
Ввод и вывод чисел в различных системах счисления
Смысл подпрограммы вывода - исходное число делят на 10 и остатки (цифры от 0 до 9) сохраняют в стеке, а потом выводят остатки на экран по одному.
1
0 / 0 / 1
Регистрация: 01.05.2017
Сообщений: 10
21.03.2020, 10:15  [ТС] 3
Прислушавшись к словам ФедосеевПавел, решил всё с нуля переписать и именно самому, получилось следующее:
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
format ELF64
public _start
 
;(64)rax = (32)eax = (16)ax = (8)ah|al(8)
 
section '.data' writable
    ; Array         db 17, -41, 71, 123, 2, -23, -17, 42, 73, -60
    Array       db 24, 17, 71, 98, 3, 45, 76, 8, 11, 9
    new_line    equ 0xA                     ; пустая строка
    msg         db "Исходный массив: ", new_line, 0       ; 0 - конец строки
    msg2        db "Преобразованный массив", new_line, 0
    msg3        db "Сумма: ", 0
    Summ1       db 0
    Summ2       db 0
    bss_char    rb 1                        ; буфер для хранения 1 байта (вывод символа)
 
 
section '.code' executable
; весь код располагается тут
_start:
    ; вывод сообщения:
    mov rax, msg
    call print_string
    ;push rcx
    mov rcx, 0
    .nex_iter:
        cmp rcx, 10
        je .close
        mov al, [Array+rcx]
        call print_number
        call print_line
        inc rcx
        jmp .nex_iter
    .close:
        ;pop rcx
 
 
    mov rax, "!"
    call print_char
    call print_line
    mov al, [Array+0]
    call print_number
    call print_line
 
 
 
    ; не далее
    call exit
 
section '.print_string' executable
print_string:
    push rax                ;
    push rbx                ; правильный
    push rcx                ; код
    push rdx                ;
 
    mov rcx, rax                ; передаем указатель на msg
    call length_string
    mov rdx, rax                ; передаем длину выводимого сообщения
    mov rax, 4              ; 4 - write
    mov rbx, 1              ; 1 - stdout
    int 0x80                ; обращение в операционной системе
 
    pop rdx                 ;
    pop rcx                 ; правильный
    pop rbx                 ; код
    pop rax                 ;
 
    ret                     ; возвращаемся в точку вызова
 
section '.length_string' executable
length_string:
    push rdx                ; если регистр rdx - использовался, то мы его значение запихнули в стек
    xor rdx ,rdx                ; обнулим регистр
    .next_iter:
        cmp [rax+rdx], byte 0       ; сравниваем значение rax со смещением rdx на наличие 0
        je .close           ; закрытие процедуры (выход)
        inc rdx
        jmp .next_iter
    .close:
        mov rax, rdx
        pop rdx             ; раз впихнули в стек, то нужно и выпихнуть :)
        ret
 
 
section '.print_number' executable
print_number:
    push rax
    push rbx
    push rcx
    push rdx
    xor rcx, rcx                ;чистим rcx
    .next_iter:
        cmp rax, 0          ; когда rax будет равен 0
        je .print_iter          ; закрытие процедуры (выход)
 
        mov rbx, 10             ; для деления
        xor rdx, rdx            ; чистим rdx
        div rbx             ; делим rax на rbx
        add rdx, '0'
        push rdx
        inc rcx             ; инкремент регистра, чтобы знать, сколько чисел выводить
        jmp .next_iter
    .print_iter:
        cmp rcx, 0
        je .close
 
        pop rax
        call print_char
        dec rcx
        jmp .print_iter
    .close:
        pop rdx
        pop rcx
        pop rbx
        pop rax
        ret
 
 
section '.print_char' executable
print_char:
    ;32bit
    push rax
    push rbx
    push rcx
    push rdx
    mov [bss_char], al
 
    mov rax, 4
    mov rbx, 1
    mov rcx, bss_char
    mov rdx, 1
    int 0x80
    pop rdx
    pop rcx
    pop rbx
    pop rax
    
 
    ;64bit
    ;push rax
 
    ;mov rax, 1 ; 1 - write
    ;mov rdi, 1 ; stdout
    ;mov rsi, rsp   ; rsp - последнее значение из стека
    ;mov rdx, 1 ; количество символов
    ;syscall
 
    ;pop rax
 
    ret
 
section '.print_line' executable
print_line:
    push rax
    mov rax, 0xA
    call print_char
    pop rax
    ret
 
section '.exit' executable
exit:
    mov rax, 1 ; 1 - exit
    mov rbx, 0 ; 0 - return
    int 0x80
Единственное, у меня не получается почему-то обратиться к элементу массива в цикле, и при выполнении кода получаю следующий ответ в терминале:

Кликните здесь для просмотра всего текста
./main
Исходный массив:
6291736
6291736
6291736
6291736
6291736
6291736
6291736
6291736
6291736
6291736
!
24


Почему так получается - понять не могу... Подскажите пожалуйста
0
Модератор
Эксперт по электронике
7340 / 3568 / 1412
Регистрация: 01.02.2015
Сообщений: 11,164
Записей в блоге: 1
21.03.2020, 17:45 4
Я так понимаю, что это FASM для Linux x64.

Вывод числа у вас несколько усложнён. Посмотрите пример для беззнакового числа.
Как-то в онлайн эмуляторе выводил число для компилятора NASM, но должно быть всё понятно - их синтаксис довольно похож
https://www.cyberforum.ru/post14230418.html
Сначала преобразовал в строку, а потом одним вызовом вывел эту строку.

Т.к. массив Array из элементов в 1 байт, то при выводе нужно расширить RAX нулями или знаковыми битами (в зависимости от формата). Например, для беззнаковых movzx al, rax, а для чисел со знаком movsx al, rax, а потом вызывать процедуру вывода.

Для процедур не нужно отдельно объявлять секции. Просто ставьте метку. А визуально выделяйте комментариями в виде множества тире.

Перебор элементов массива можно сделать несколькими способами.
1. по указателю
Assembler
1
2
3
4
5
6
7
8
lea rsi, [Array] ;для lodsb
mov rdi, rsi ;для stosb
mov rcx, Array_len
.for:
  lodsb
  какие-то изменения элемента массива
  stosb
loop .for
2. по индексу
Assembler
1
2
3
4
5
6
7
8
lea rbx, [Array]
xor rsi, rsi
.for:
  movzx rax, byte [rbx+1*rsi]  ;число 1 - размер элемента массива
  какие-то действия с элементом массива - например, вывод
  inc rsi
  cmp rsi, Array_len
jne .for
0
0 / 0 / 1
Регистрация: 01.05.2017
Сообщений: 10
23.03.2020, 17:06  [ТС] 5
Лучший ответ Сообщение было отмечено ФедосеевПавел как решение

Решение

!!!!Решено!!!!

Рабочий код, всё пофиксил, всё работает:

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
format ELF64
public _start
 
;(64)rax = (32)eax = (16)ax = (8)ah|al(8)
 
section '.data' writable
    ; Array         db 17, -41, 71, 123, 2, -23, -17, 42, 73, -60
    Array       db 24, 17, 71, 98, 3, 45, 76, 8, 11, 9
    n       = $-Array
    new_line    equ 0xA                     ; пустая строка
    msg         db "Исходный массив:        Преобразованный массив:", new_line, 0        ; 0 - конец строки
    msg2        db "Суммы: ", 0
    bss_char    rb 1                        ; буфер для хранения 1 байта (вывод символа)
 
 
section '.code' executable
; весь код располагается тут
_start:
    ; вывод исходного массива:
    mov rax, msg
    call print_string
    push rcx
    mov rcx, 0
    xor rbx, rbx
 
    .nex_iter:
        cmp rcx, n
        je .close
 
        xor rax, rax                ; чистим rax
        mov al, [Array+rcx]         ; перетаскиваем значение рассматриваемого элемента массива в регистр al
        add rbx, rax                ; добавляем с rbx значение rax        подсчет суммы (первая сумма хранится в rbx)
        call print_number           ; печатаем текущий элемент массива
 
        ;преобразование элемента массива
        or al, 00010000b            ; умножение по маске
        add rdx, rax
        call print_tab
        call print_tab
        call print_tab
        call print_number           ; печатаем текущий преобразованный элемент массива
        call print_line             ; перенос каретки
 
        inc rcx                 ; инкремент счетчика
        jmp .nex_iter
    .close:
        pop rcx
 
        call print_line
        xor rax, rax
        mov rax, msg2               ; вывод строки "Сумма"
        call print_string
        call print_tab
        mov rax, rbx                ; вывод суммы исходного массива
        call print_number
        call print_tab
        call print_tab
        xor rax, rax
        mov rax, rdx                ; вывод суммы преобразованного массива
        call print_number
        call print_line
 
    ;xor rax, rax
    ;mov rax, "."
    ;call print_char
    ;call print_line
 
    ; не далее
    call exit
 
section '.print_string' executable
print_string:
    push rax                ;
    push rbx                ; правильный
    push rcx                ; код
    push rdx                ;
 
    mov rcx, rax                ; передаем указатель на msg
    call length_string
    mov rdx, rax                ; передаем длину выводимого сообщения
    mov rax, 4              ; 4 - write
    mov rbx, 1              ; 1 - stdout
    int 0x80                ; обращение в операционной системе
 
    pop rdx                 ;
    pop rcx                 ; правильный
    pop rbx                 ; код
    pop rax                 ;
 
    ret                     ; возвращаемся в точку вызова
 
section '.length_string' executable
length_string:
    push rdx                ; если регистр rdx - использовался, то мы его значение запихнули в стек
    xor rdx ,rdx                ; обнулим регистр
    .next_iter:
        cmp [rax+rdx], byte 0       ; сравниваем значение rax со смещением rdx на наличие 0
        je .close           ; закрытие процедуры (выход)
        inc rdx
        jmp .next_iter
    .close:
        mov rax, rdx
        pop rdx             ; раз впихнули в стек, то нужно и выпихнуть :)
        ret
 
 
section '.print_number' executable
print_number:
    push rax
    push rbx
    push rcx
    push rdx
    xor rcx, rcx                ;чистим rcx
    .next_iter:
        cmp rax, 0          ; когда rax будет равен 0
        je .print_iter          ; закрытие процедуры (выход)
 
        mov rbx, 10             ; для деления
        xor rdx, rdx            ; чистим rdx
        div rbx             ; делим rax на rbx
        add rdx, '0'
        push rdx
        inc rcx             ; инкремент регистра, чтобы знать, сколько чисел выводить
        jmp .next_iter
    .print_iter:
        cmp rcx, 0
        je .close
 
        pop rax
        call print_char
        dec rcx
        jmp .print_iter
    .close:
        pop rdx
        pop rcx
        pop rbx
        pop rax
        ret
 
 
section '.print_char' executable
print_char:
    ;32bit
    push rax
    push rbx
    push rcx
    push rdx
    mov [bss_char], al
 
    mov rax, 4
    mov rbx, 1
    mov rcx, bss_char
    mov rdx, 1
    int 0x80
    pop rdx
    pop rcx
    pop rbx
    pop rax
    
 
    ;64bit
    ;push rax
 
    ;mov rax, 1 ; 1 - write
    ;mov rdi, 1 ; stdout
    ;mov rsi, rsp   ; rsp - последнее значение из стека
    ;mov rdx, 1 ; количество символов
    ;syscall
 
    ;pop rax
 
    ret
 
section '.print_line' executable
print_line:
    push rax
    mov rax, 0xA
    call print_char
    pop rax
    ret
 
section '.print_tab' executable
print_tab:
    push rax
    mov rax, 09
    call print_char
    pop rax
    ret
 
section '.exit' executable
exit:
    mov rax, 1 ; 1 - exit
    mov rbx, 0 ; 0 - return
    int 0x80
Вывод в консоли:
Кликните здесь для просмотра всего текста
Исходный массив: Преобразованный массив:
24 24
17 17
71 87
98 114
3 19
45 61
76 92
8 24
11 27
9 25

Суммы: 362 490
0
Модератор
Эксперт по электронике
7340 / 3568 / 1412
Регистрация: 01.02.2015
Сообщений: 11,164
Записей в блоге: 1
23.03.2020, 17:52 6
Vovka_Nikel,
1. при выводе числа в print_number проверку на нулевое значение делимого нужно проводить после деления - чтобы строка формировалась и при rax=0 на входе в процедуру. Попробуйте один из элементов массива обнулить и поймёте.
2. так и остались разбиения на секции для каждой процедуры - это лишнее.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.03.2020, 17:52

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Вывод элементов массива в таблицу с задержкой после каждого элемента
Здравствуйте. Возникла необходимость вывода элементов массива в таблицу с паузой после каждого...

Поиск суммы элементов массива, расположенных после минимального элемента
В общем ошибка такая: работает через раз, пропускает максимальный и вместо этого берет последнее ...

Функция нахождения суммы элементов массива, расположенных после максимального элемента
2. Найти сумму элементов массива, расположенных после максимального элемента.

Установить 0 в 5-м бите всех эл массива целых чисел с четным индексом и 1 - в 4-м бите всех нечетных эл массива.
Установить 0 в 5-м бите всех элементов массива целых чисел с четным индексом и 1 - в 4-м бите всех...

После каждого четного элемента массива вставить два элемента с тем же значением, после чего полученный массив отсортировать по убыванию
Ребят, помогите с задачкой новичку. После каждого четного элемента массива вставить два элемента с...

После каждого четного элемента массива вставить два элемента с тем же значением
После каждого четного элемента массива вставить два элемента с тем же значением. Прошу помогите...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.