|
0 / 0 / 0
Регистрация: 16.12.2012
Сообщений: 19
|
|
Изменить программу14.01.2013, 22:00. Показов 599. Ответов 0
Метки нет (Все метки)
Изменить программу. При выводе результата на экран интервал между группами из двух символов сделать равным не 1, а 2-ум.Жду ответов. Заранее спасибо.
Turbo Assembler Version 3.2 01/14/13 18:24:46 Page 1 lab2.ASM LaborRabota1 1 2 0000 sts SEGMENT PARA STACK 'Stack' 3 0000 20*(????) DW 32 DUP (?) 4 0040 sts ENDS 5 6 0000 data SEGMENT 7 0000 45 6E 74 65 72 0A 0D+ mes1 db 'Enter',0Ah,0Dh,'$' 8 24 9 0008 31 73 74 0A 0D 24 mes2 db '1st',0Ah,0Dh,'$' 10 000E 0A 0D 32 6E 64 0A 0D+ mes3 db 10,13,'2nd',0Ah,0Dh,'$' 11 24 12 0016 0A 0D 52 65 7A 75 6C+ mes4 db 10,13,'Rezult ',0Ah,0Dh,'$' 13 74 20 0A 0D 24 14 0022 15 ?? famm db 21,? 15 0024 0A*(????) fam dw 10 dup (?) 16 0038 15 ?? tabss db 21,? 17 003A 0A*(????) tabs dw 10 dup (?) 18 004E 0A*(????) dim dw 10 dup (?) 19 0062 data ends 20 21 0000 text SEGMENT 22 assume CS:text, DS:data, SS:sts 23 0000 main proc far 24 ;-----Block 1----------- 25 0000 1E push DS 26 0001 33 C0 xor AX,AX 27 0003 50 push ax 28 ;-----Block 2----------- 29 0004 B8 0000s mov ax,data 30 0007 8E D8 mov DS,AX 31 ;-----Block 3----------- 32 0009 BA 0000r lea DX,mes1 33 000C B4 09 mov AH,09h 34 000E CD 21 int 21h 35 ;-----Block 4----------- 36 0010 BA 0008r lea DX,mes2 37 0013 B4 09 mov AH,09h 38 0015 CD 21 int 21h 39 ;-----Block 5----------- 40 0017 BA 0038r lea DX,tabss 41 001A B4 0A mov AH,0Ah 42 001C CD 21 int 21h 43 ;-----Block 6----------- 44 001E BA 000Er lea DX,mes3 45 0021 B4 09 mov AH,09h 46 0023 CD 21 int 21h 47 ;-----Block 7----------- 48 0025 BA 0022r lea DX,famm 49 0028 B4 0A mov AH,0Ah 50 002A CD 21 int 21h 51 ;-----Block 8----------- 52 002C BE 0000 mov SI,0 53 002F BF 004Er lea DI,dim 54 0032 B9 000A mov CX,10 55 ;-----Block 9----------- 56 0035 M1: 57 0035 8B 84 003Ar mov AX,tabs[SI] Turbo Assembler Version 3.2 01/14/13 18:24:46 Page 2 lab2.ASM LaborRabota1 58 0039 8B 9C 0024r mov bx,fam[SI] 59 003D 3B C3 cmp AX,BX 60 003F 74 03 je Equal 61 0041 B8 3030 mov AX,3030h 62 0044 Equal: 63 0044 89 05 mov [DI],AX 64 0046 83 C6 02 add SI,2 65 0049 83 C7 02 add DI,2 66 004C E2 E7 loop M1 67 ;-----Block 10---------- 68 004E B5 00 mov CH,0 69 0050 B1 00 mov CL,0 70 0052 B6 19 mov DH,25 71 0054 B2 50 mov DL,80 72 0056 B7 07 mov BH,07 73 0058 B4 06 mov AH,06 74 005A B0 00 mov AL,0 75 005C CD 10 int 10h 76 ;-----Block 11---------- 77 005E B4 02 mov AH,02 78 0060 B7 00 mov BH,0 79 0062 BA 0000 mov DX,0 80 0065 CD 10 int 10h 81 ;-----Block 12---------- 82 0067 BA 0016r lea DX,mes4 83 006A B4 09 mov AH,09 84 006C CD 21 int 21h 85 ;-----Block 13---------- 86 006E B9 0005 mov CX,5 87 0071 BE 0000 mov SI,0 88 0074 M2: 89 0074 51 push CX 90 0075 8B 84 004Er mov AX,dim[SI] 91 0079 B3 04 mov BL,04h 92 007B E8 0010 call print 93 007E 8B 84 0050r mov AX,dim[SI+2] 94 0082 B3 10 mov BL,10h 95 0084 E8 0007 call print 96 0087 59 pop CX 97 0088 83 C6 04 add SI,4 98 008B E2 E7 loop M2 99 ;----------------------- 100 008D CB ret 101 008E main endp 102 ;======================= 103 008E print proc 104 ;-----Block 14---------- 105 008E 50 push AX 106 ;-----Block 15---------- 107 008F B4 09 mov AH,09 108 0091 B7 00 mov BH,0 109 0093 B9 0001 mov CX,1 110 0096 CD 10 int 10h 111 ;-----Block 16---------- 112 0098 B4 03 mov AH,03 113 009A B7 00 mov BH,0 114 009C CD 10 int 10h Turbo Assembler Version 3.2 01/14/13 18:24:46 Page 3 lab2.ASM LaborRabota1 115 ;-----Block 17---------- 116 009E 80 C2 01 add DL,1 117 00A1 B4 02 mov AH,02 118 00A3 B7 00 mov BH,0 119 00A5 CD 10 int 10h 120 ;-----Block 18---------- 121 00A7 58 pop AX 122 00A8 86 E0 xchg AH,AL 123 ;-----Block 19---------- 124 00AA B4 09 mov AH,09 125 00AC B9 0001 mov CX,1 126 00AF CD 10 int 10h 127 ;-----Block 20---------- 128 00B1 B4 03 mov AH,03 129 00B3 B7 00 mov BH,0 130 00B5 CD 10 int 10h 131 ;-----Block 21---------- 132 00B7 80 C2 02 add DL,2 133 00BA B4 02 mov AH,02 134 00BC B7 00 mov BH,0 135 00BE CD 10 int 10h 136 ;----------------------- 137 00C0 C3 ret 138 00C1 print endp 139 00C1 text ends 140 end main Turbo Assembler Version 3.2 01/14/13 18:24:46 Page 4 Symbol Table LaborRabota1 Symbol Name Type Value ??DATE Text "01/14/13" ??FILENAME Text "lab2 " ??TIME Text "18:24:46" ??VERSION Number 0314 @CPU Text 0101H @CURSEG Text TEXT @FILENAME Text LAB2 @WORDSIZE Text 2 DIM Word DATA:004E EQUAL Near TEXT:0044 FAM Word DATA:0024 FAMM Byte DATA:0022 M1 Near TEXT:0035 M2 Near TEXT:0074 MAIN Far TEXT:0000 MES1 Byte DATA:0000 MES2 Byte DATA:0008 MES3 Byte DATA:000E MES4 Byte DATA:0016 PRINT Near TEXT:008E TABS Word DATA:003A TABSS Byte DATA:0038 Groups & Segments Bit Size Align Combine Class DATA 16 0062 Para none STS 16 0040 Para Stack STACK TEXT 16 00C1 Para none
0
|
|
| 14.01.2013, 22:00 | |
|
Ответы с готовыми решениями:
0
Ввести имя файла, ввести текст, сохранить текст в файле
Изменить программу для вычисления максимума |
| 14.01.2013, 22:00 | |
|
Помогаю со студенческими работами здесь
1
Изменить программу, редактируя её HEX-код Изменить программу, строящую график синуса Возможно ли изменить немного уже откомпилированную программу? Изменить программу, чтобы она работала с длинными именами файлов Изменить программу для нахождения максимального (вместо минимального) элемента в массиве Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым.
Но восстановить их можно так.
Для этого понадобится консольная утилита. . .
|
Изучаю kubernetes
lagorue 13.01.2026
А пригодятся-ли мне знания kubernetes в России?
|
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
|
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11
— это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
|
|
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11
Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
|
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
|
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/
O1rJuneU_ls
https:/ / vkvideo. ru/ video-115721503_456239114
|
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ВВЕДЕНИЕ
Введу сокращения:
аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
|