Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- .386
- .model flat, stdcall
- option casemap :none
- include \masm32\include\windows.inc
- include \masm32\include\user32.inc
- include \masm32\include\kernel32.inc
- includelib \masm32\lib\user32.lib
- includelib \masm32\lib\kernel32.lib
- .data
- A DD -1, -2, -3, -4, 1, 2, 0, 4, 2000, 4096, 65535, 0
- k_str dD 3
- k_stolb dD 4
- KOL_ZERO Dd 0
- Zagolovok db "programm result",0
- sResult byte 50 dup (?)
- sfc db "в массиве А нулевых элементов - %.1li шт.",0
- ;------------------------------------------------
- .code
- start:
- MOV ECX,k_str ;счётчик циклов по строкам
- for_STR:
- XOR EBX,EBX ;обнуление счетчика суммы
- XCHG ECX,EDX ;перенастройка ЕСХ на счётчик столбцов
- MOV ECX,k_stolb ;счётчик циклов по столбцам
- for_STOLB:
- MOV ESI, ECX
- DEC ESI ; индекс в столбце
- MOV EDI, EDX
- DEC EDI ; индекс в строке
- MUL
- LOOP for_STOLB
- ADD EBX, 16
- XCHG ECX,EDX ;перенастройка ЕСХ на счётчик строк
- LOOP for_STR
- invoke wsprintf, ADDR sResult, ADDR sfc, KOL_ZERO
- invoke MessageBox, NULL, ADDR sResult, addr Zagolovok, MB_OK
- invoke ExitProcess, NULL
- end start ;Конец программы
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement