Хостинг Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг на Windows 2008

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

Чемпионы рейтинга экспертов в этой рассылке

Лысков Игорь Витальевич Статус: Специалист Рейтинг: 295 ∙ повысить рейтинг >>

Зенченко Константин Николаевич Статус: Профессор Рейтинг: 170 ∙ повысить рейтинг >>

Boriss Статус: Профессор Рейтинг: 25 ∙ повысить рейтинг >>

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Assembler (Ассемблер)

Выпуск № 1149
от 31.12.2008, 11:35

Вопрос № 155738: Здравствуйте, уважаемые эксперты. Помогите пожалуйста. В отдельном каталоге создано шесть текстовых файлов с однотипными именами, отличающимися одной цифрой: TEXT1.LAB, TEXT2.LAB, TEXT3.LAB, TEXT4.LAB, TEXT5.LAB, TEXT6.LAB. Эти файлы надо снач...

Вопрос № 155.738

Здравствуйте, уважаемые эксперты. Помогите пожалуйста. В отдельном каталоге создано шесть текстовых файлов с однотипными именами, отличающимися одной цифрой: TEXT1.LAB, TEXT2.LAB, TEXT3.LAB, TEXT4.LAB, TEXT5.LAB, TEXT6.LAB. Эти файлы надо сначала создать при помощи редактора текстов. Необходимо составить две программки, которые: 1) Разбивают каждый файл пополам на 2 файла. 2) Сливают попарно исходные файлы по порядку номеров: 1 с 2, 3 с 4, 5 с 6.

Отправлен: 25.12.2008, 11:53 Вопрос задала: Егорова Катерина Федоровна (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 13)

Отвечает: Boriss Здравствуйте, Егорова Катерина Федоровна! Сделал пока деление на части. Завтра доделаю вторую часть и допишу (хотя "это" будет использовано) В приложенном архиве мои исходные файлы и исходник -- ЗЫ: комментариев не писал, но, полагаю, разберетесь... Или спрашивайте Приложение: .model tiny LOCALS @@ JUMPS code org 100h start: mov ax, 3 int 10h mov CX, 6 @1: push cx xor al, al mov F_add, al inc F_No CALL MakeFileName ; открываем для чтения mov ax, 3D00h lea dx, FileName int 21h jc error mov Handle01, ax ; формируем файлы в которые будут записаны части inc F_add CALL MakeFileName ; создаем и открываем для записи mov ah, 3Ch xor cx, cx lea dx, FileName int 21h jc error mov Handle02, ax inc F_add CALL MakeFileName ; создаем и открываем для записи mov ah, 3Ch xor cx, cx lea dx, FileName int 21h jc error mov Handle03, ax ; чтение в буфер lea dx, LastLabel mov ah, 3Fh mov bx, Handle01 mov cx, 0FFFFh ; считаем, что длина файла < 65536 int 21h mov FileLen, ax ; число считанных байт ; запись в файлы mov ah, 40h mov bx, Handle02 lea dx, LastLabel mov cx, FileLen shr cx, 1 ; делим пополам push cx int 21h jc error pop ax mov cx, FileLen sub cx, ax lea dx, LastLabel add dx, ax mov ah, 40h mov bx, Handle03 int 21h jc error ; закрываем файлы cld lea si, Handle01 mov cx, 3 @3: lodsw or ax, ax jz @@4 mov bx ,ax mov ah, 3Eh int 21h @4: LOOP @@3 pop cx LOOP @@1 jmp ok error: lea dx, msg_error mov ah, 9 int 21h ok: lea dx, PressKey mov ah,9 int 21h xor ax, ax int 16h int 20h PressKey db 'Нажмите любую клавишу ...$' msg_error db 'Ошибка работы с файлом',13,10,'$' ; все ASCIIZ DirName db 'D:asmTA155738TEXT',0 F_Ext db '.LAB',0 F_add db 0 ; если 0, то не добавляется - так различать имена исходных и новых F_No db 0 FileName db 80 dup (?) Handle01 dw ? ; дескрипторы файлов Handle02 dw ? Handle03 dw ? FileLen dw ? MakeFileName proc ; формирование имени файла FileName push ax push di push si cld lea si, DirName ; В СОМ-файле ds = es lea di, FileName @1: lodsb or al, al jz @@2 stosb jmp @@1 @2: mov al, F_No add al, '0' stosb mov al, F_add or al, al jz @@3 add al, 'a'-1 stosb @3: lea si, F_ext @4: lodsb or al, al jz @@5 stosb jmp @@4 @5: xor al, al stosb pop si pop di pop ax ret MakeFileName endp ; последняя метка в файле - место после нее будет использоваться как буфер LastLabel: end start Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- Вывод - то место в тексте, где вы устали думать

Ответ отправил: Boriss (статус: Профессор) Россия, Саранск Организация: Мордовский госуниверситет, Саранск, Факультет Электронной Техники WWW: Программирование на Паскале ICQ: 320096696 ---- Ответ отправлен: 25.12.2008, 23:15 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 239668 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Вопрос № 155.765

Здравствуйте, уважаемые эксперты. Помогите, пожалуйста, доделать мою программу в ассемблере. Задание: Составить программу, выводящую на экран и в задаваемый с клавиатуры файл десятичное представление факториала. Должна быть работоспособна для вычисления 1000. Число тоже нужно задавать с клавиатуры с контролем ввода. __ Мне дали код программы, но ввода числа нету. Попытался сделать но не смог. Нужно сделать 1) Ввод числа, которое будет вычисляться 2) Ответ вывести на экране и при этом окно не закрывать (в моем коде чистое окно) 3) Ввод имени файла не обязателен (в задании есть, но считается необязательным) 4) В файле вывести не только ответ, но и с какого числа находился факториал (В моем коде просто ответ) 5) Заранее очень при очень благодарен Ниже приводиться мой код на ассемблере: Приложение: model tiny 386 masm code assume cs:@code, ds:@code, ss:@code org 100h begin: jmp @start msg1 db 'Vvedite chislo $' Num1 db 2599 dup (0), 1 ; Каждое число из 2600 цифр, в этом храним 1 Num2 db 2600 dup (0) NFact dw 5 ; Задаем, какой нужен N! fName db 'Result.txt',0 ; куда результат выводить hFile dw 0 Addition proc near pusha mov cx, 2599 add di, cx add si, cx @add_1: mov al, [si] add al, [di] daa add al, ah daa mov ah, al shr ah, 4 and al,0Fh mov [si], al dec si dec di dec cx jnz @add_1 popa ret Addition endp ;//================= Main code @start: mov AH, 09h lea DX, msg1 int 21h push cs pop ds push ds pop es mov ah, 3Ch ; // Create file xor cx, cx lea dx, Fname int 21h mov hFile, ax mov bx, 2 @fact: lea si, Num1 ; lea di, Num2 ; cld mov cx, 1300 rep movsw ; // Num2 = Num1 lea si, Num1 lea di, Num2 mov cx, bx dec cx @fact1: ; // (Num1 = Num1 + Num2) * BX call Addition loop @fact1 inc bx cmp bx, NFact jle @fact lea si, Num1 ; // Преобразование в ASCII код mov cx, 2600 @toascii: add byte ptr [si], '0' inc si loop @toascii lea si, Num1 ; // Остались вначале нули mov cx, 2600 xor di, di @k1: cmp byte ptr [si], '0' jnz @k2 inc di inc si loop @k1 @k2: mov ah, 40h mov bx, hFile mov cx, 2600 sub cx, di mov dx, si int 21h mov ax, 4C00h int 21h end begin

Отправлен: 25.12.2008, 15:59 Вопрос задал: Хребтов Константин Сергевич (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 4)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Хребтов Константин Сергевич! В приложении код, который вводит с клавиатуры число и считает его факториал. Для 1000! первые цифры почему-то совпадают: © Цитата: 4023872600770937735437024339230039857193748642107146325437999104299... Вопросы задавайте в мини-форум. Удачи! Приложение: model tiny code 186 nsize equ 3000 org 100h ;текстовый режим begin: mov ax,3 int 10h ;выводим сообщение mov ah,9 mov dx,offset dbEnter int 21h ;начинаем ввод числа xor si,si mov bx,10 ;считываем символ без эхо InputNumber: xor ax,ax int 16h ;проверяем нажатую клавишу ;это клавиша ввод cmp al,13 jz InputStop ;это цифровая клавиша cmp al,'0' jb InputNumber cmp al,'9' ja InputNumber ;выводим цифру push ax int 29h pop ax ;суммирем с ранее введенным числом and ax,0fh xchg si,ax mul bx add si,ax ;проверяем достигли ли предела вводимого числа push si and si,0f800h pop si ; jz InputNumber ;выводим сообщение об ошибке xaxa: mov ah,9 mov dx,offset dbErrorInput int 21h jmp isStopWork ;начинаем посчет факториала InputStop: mov dwNumber,si ;чистим буфер mov cx,nSize mov di,offset dwFactorial xor ax,ax cld rep stosw inc ax mov [di],ax ;запоминаем адрес последней цифры mov dwZeroPower,di ;востанавливаем максимальное число mov cx,dwNumber ;настраиваемся для коррекции isCorrection: mov dwNumber,cx mov cx,nsize mov ax,[di] mov bx,10 ;корректируем цифры isLoopCorrection: xor dx,dx div bx ;остаток записываем mov [di],dx dec di dec di ;суммируем с старшим разрядом add ax,[di] loop isLoopCorrection ;умножаем на текущий номер mov bx,dwNumber mov cx,nSize ;все цифры умножаем на текущее число isLoopMultiplicate: inc di inc di mov ax,[di] mul bx mov [di],ax loop isLoopMultiplicate ;корректируем текущее число mov cx,dwNumber loop isCorrection ;создаем файл mov ah,3ch xor cx,cx mov dx,offset dbFileName int 21h ;ошибка создания файла jc xaxa ;начинаем запись в файл mov dwFileHndl,ax mov si,offset dwFactorial mov cx,nSize+1 xor di,di ;считываем число isSave: lodsw ;Если ноль пропускаем установку флага or ax,ax jz isZero mov di,-1 ;проверяем флаг если ноль пропускаем запись isZero: or di,di jz noSave push cx ;преобразовываем в символ or ax,30h mov [si-2],ax ;записываем символ в файл mov ah,40h mov bx,dwFileHndl mov dx,si dec dx dec dx mov cx,1 int 21h pop cx ;все в цикле noSave: loop isSave ;закрываем файл mov ah,3eh mov bx,dwFileHndl int 21h ;нажимайте любую клавишу isStopWork: xor ax,ax int 16h ret ; dwFileHNDL dw ? dwZeroPower dw ?;не нужно dwNumber dw ? dbFileName db 'asCheck.txt',0 dbEnter db 13,10,'Enter Number:$' dbErrorInput db 13,10,13,10,'Wronr input number$' dwFactorial dw (nsize+2) dup(?) end begin --------- Итерация от человека, рекурсия — от Бога (Питер Дойч)

Ответ отправил: Зенченко Константин Николаевич (статус: Профессор) Украина, Киев Тел.: +380979536619 Адрес: Украина г.Киев ---- Ответ отправлен: 30.12.2008, 12:42 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 240046 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5 Комментарий оценки: Большое спасибо, что ответили

Вопрос № 155.809

Здравствуйте, уважаемые. Мне необходимо решить такую задачу: определить количество элементов в каждой убывающей последовательности массива А(20)Задача почти решена, надо лишь исправить, чтобы она не считала убывающие последовательности из одного элемента. Убывающая последовательность должна сситатся если в ней минимум 2 элемента. Приложение: .model small .stack 100h .data buf label byte ; буфер для приема строки с клавиатуры (по ф-и 0ah) max db 20 ; максимальная длина строки len db 0 ; реальная длина введенной строки string db 20 dup (?) ; сама строка .code mov ax,@data mov ds,ax mov es,ax lea dx, buf mov ah, 0ah int 21h ; вводим строку call next_row ; перевод на новую строку lea si, string ; адрес строки xor cx, cx mov cl, len ; длина строки xor di, di ; максимальное количество из длин последовательностей mov dl, 0 ; чтобы первый байт просто сохранить jcxz print_max ; если введена пустая строка search_loop: lodsb ; очередной символ test dl, dl ; самый первый байт? jz group_start cmp al, dl ; сравним с сохраненным jae next_group ; если очередной >= сохраненного, то начинается новая группа inc bx ; считаем jmp search_next next_group: push ax ; сохраним в стеке символ (чтобы потом корректно сохранить в dl) mov ax, bx call print_num ; выведем число из bx и одновременно ищем максимальное (в di) pop ax group_start: mov bx, 1 ; счетчик в текущей убывающей последовательности search_next: mov dl, al ; сохраним текущий первый символ loop search_loop ; с начала новой последовательности mov ax, bx call print_num ; выведем счетчик последней последовательности print_max: ; дошли до конца call next_row ; перевод на новую строку mov ax, di call print_num ; выведем максимальное количество call next_row ; перевод на новую строку mov ah, 0 ; ждем нажатие на клавишу, int 16h ; чтобы окно не пропадало сразу в Windows :) mov ax,4c00h int 21h ; преобразуем число из AX в последовательность символов ; у нас число 0-127 (последний байт под код 0dh) ; поэтому для преобразовании нам достаточно делить на байт 10 ; одновременно ищем максимальное (в регистре di) print_num proc push dx bx cx ; сохраним использованные регистры cmp ax, di ; сравним с максимальным jbe form_str mov di, ax ; новое значение form_str: mov bl, 10 ; будем делить на 10 xor cx, cx ; счетчик цифр div_loop: ; цикл получения десятичных разрядов div bl ; в ah остаток - очередной десятичный разряд push ax ; сохраним в стеке (от младшего к старшему) inc cx ; посчитаем mov ah, 0 ; подготовимся для следующего деления (отбросим остаток) test ax, ax ; есть еще десятичные разряды? jnz div_loop ; продолжим pr_loop: ; цикл вывода десятичных цифр-символов pop ax ; востановим очередной разряд (от старшего к младшему) c1: cmp ax,2 jae c2 loop pr_loop c2: mov dl, ah ; сформируем в dl add dl, '0' ; символ цифры mov ah, 2 ; ф-я вывода символа из dl на экран int 21h ; вывод loop pr_loop ; по всем цифрам mov dl, ' ' ; выведем отделяющий пробел mov ah, 2 int 21h pop cx bx dx ret print_num endp next_row proc ; перевод на следующую строку push dx mov ah, 2 mov dl, 0dh int 21h mov ah, 2 mov dl, 0ah int 21h pop dx ret next_row endp end

Отправлен: 25.12.2008, 23:11 Вопрос задал: Кулик Александр Сергеевич (статус: 3-й класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Лысков Игорь Витальевич Здравствуйте, Кулик Александр Сергеевич! Программа моя, править тоже мне... Подправленная программа в приложении. Приложение: .model small .stack 100h .data buf label byte ; буфер для приема строки с клавиатуры (по ф-и 0ah) max db 20 ; максимальная длина строки len db 0 ; реальная длина введенной строки string db 20 dup (?) ; сама строка .code .startup mov ax,@data mov ds,ax mov es,ax lea dx, buf mov ah, 0ah int 21h ; вводим строку call next_row ; перевод на новую строку lea si, string ; адрес строки xor cx, cx mov cl, len ; длина строки xor di, di ; максимальное количество из длин последовательностей mov dl, 0 ; чтобы первый байт просто сохранить jcxz print_max ; если введена пустая строка search_loop: lodsb ; очередной символ test dl, dl ; самый первый байт? jz group_start cmp al, dl ; сравним с сохраненным jae next_group ; если очередной >= сохраненного, то начинается новая группа inc bx ; считаем jmp search_next next_group: push ax ; сохраним в стеке символ (чтобы потом корректно сохранить в dl) mov ax, bx cmp ax, 1 jz restore_code call print_num ; выведем число из bx и одновременно ищем максимальное (в di) restore_code: pop ax group_start: mov bx, 1 ; счетчик в текущей убывающей последовательности search_next: mov dl, al ; сохраним текущий первый символ loop search_loop ; с начала новой последовательности mov ax, bx cmp ax, 1 jz print_max call print_num ; выведем счетчик последней последовательности print_max: ; дошли до конца call next_row ; перевод на новую строку mov ax, di call print_num ; выведем максимальное количество call next_row ; перевод на новую строку mov ah, 0 ; ждем нажатие на клавишу, int 16h ; чтобы окно не пропадало сразу в Windows :) mov ax,4c00h int 21h ; преобразуем число из AX в последовательность символов ; у нас число 0-127 (последний байт под код 0dh) ; поэтому для преобразовании нам достаточно делить на байт 10 ; одновременно ищем максимальное (в регистре di) print_num proc push dx bx cx ; сохраним использованные регистры cmp ax, di ; сравним с максимальным jbe form_str mov di, ax ; новое значение form_str: mov bl, 10 ; будем делить на 10 xor cx, cx ; счетчик цифр div_loop: ; цикл получения десятичных разрядов div bl ; в ah остаток - очередной десятичный разряд push ax ; сохраним в стеке (от младшего к старшему) inc cx ; посчитаем mov ah, 0 ; подготовимся для следующего деления (отбросим остаток) test ax, ax ; есть еще десятичные разряды? jnz div_loop ; продолжим pr_loop: ; цикл вывода десятичных цифр-символов pop ax ; востановим очередной разряд (от старшего к младшему) ;c1: cmp ax,2 ; jae c2 ; loop pr_loop ;c2: mov dl, ah ; сформируем в dl add dl, '0' ; символ цифры mov ah, 2 ; ф-я вывода символа из dl на экран int 21h ; вывод loop pr_loop ; по всем цифрам mov dl, ' ' ; выведем отделяющий пробел mov ah, 2 int 21h pop cx bx dx ret print_num endp next_row proc ; перевод на следующую строку push dx mov ah, 2 mov dl, 0dh int 21h mov ah, 2 mov dl, 0ah int 21h pop dx ret next_row endp end --------- Удачи!

Ответ отправил: Лысков Игорь Витальевич (статус: Специалист) Ответ отправлен: 26.12.2008, 00:54 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 239678 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5 Комментарий оценки: Огромное вам спасибо за ваш труд. Счастливого нового года.

Вопрос № 155.830

Здравствуйте. Проблема как я её понял заключается в том, что программа зацикливается, но как и почему это происходит мне не понятно, помогите пожалуйста заставить её нормально работать. Поиском пользовался, но возможно я просто задавал некорректные вопросы. не обращайте внимания на лишние переменные программа переписывается с практически с нуля уже не первый раз Буду рад любой помощи. Приложение: masm model small 386 stack 512h data mes0 db 10,13,"Vediterazmernost nxm <= 16$" mes1 db 10,13,"Vvedite kol-vo strok $" mes1_1 db 10,13,"Vvedite kol-vo stolbcev $" mes2 db 10,13,"Vvedite elementi matrici: $" mes3 db 10,13,"matrica $" mes4 db 10,13,"preobrazovannaya matrica $" ent db 10,13,"$" probel db " $" mas db 4 dup (4 dup (?)) max db 0 ndx db 2 dup (?) buf db 0 m db ? n db 0 nn db 0 i db ? j db ? code main: mov ax,@data mov ds,ax mov ax,03 int 10h ; очистка экрана call vvod_raz ; процедура ввода размерности call vvod_elem ; процедура ввода элементов call vivod_safe ; процедура вывода матрицы ; *********************************************** ; --- процедуры ----------- ; *********************************************** ; ************ ; ************ vvod_elem proc ; процедура ввода элементов НАЧАЛО mov ah,09h mov dx,offset mes2 int 21h mov al,m mul n ; proizvedenie v AX mov cx,ax ; kolich-vo ciklov -> CX mov di,0 ; nachinaem s 0 ml: ;******** mov ah,01h int 21h ; otpravlaet v AL mov mas[di],al ; vvod elementa add di,2 ; переход к следующему элементу ;******** mov ah,09h mov dx,offset probel int 21h loop ml mov ah,09h mov dx,offset ent int 21h mov ah,09h mov dx,offset ent int 21h ret vvod_elem endp ; процедура ввода элементов КОНЕЦ ; ************ ; ************ vivod_safe proc mov ax,0 ; очищаем ax mov al,n ; n->al mov dl,m ; m->dl mul dl ; n*m | al*dl->al mov cx,ax ; сx:=al | cx - это количество циклов mov bx,0 ; начинаем с НУЛЕВОГО элемента массива mov dx,0 push dx ciklex: mov dl,mas[bx] mov ah,2 int 21h ; вывод элемента массива mov dl,9 ; табуляция int 21h add bx,2 ;**** pop dx push bx inc dx xor ax,ax mov al,n mov bx,dx cmp ax,bx jne @IfNot lea dx,ent mov ah,9 int 21h ; enter xor dx,dx @IfNot: pop bx push dx ;**** loop ciklex mov ah,09h mov dx,offset ent int 21h ret vivod_safe endp ; ************ ; ************ ; ************ ; ************ ; ************ ; ************ vvod_raz proc ; процедура ввода размерности НАЧАЛО mov ah,09h mov dx,offset mes0 int 21h mov ah,09h mov dx,offset mes1 int 21h mov ah,01h int 21h ; otpravlaet v AL mov m,al ; stroki sub m,30h mov ah,09h mov dx,offset mes1_1 int 21h mov ah,01h int 21h ; otpravlaet v AL mov n,al ; stolbci sub n,30h mov ah,09h mov dx,offset ent int 21h ret vvod_raz endp ; процедура ввода размерности КОНЕЦ ;---------------------------------------------- mov ax,4c00h int 21h ;выход из программы end main

Отправлен: 26.12.2008, 05:38 Вопрос задал: Shaman_888 (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 4)

Отвечает: Зенченко Константин Николаевич Здравствуйте, Shaman_888! Перепишите этот участоко кода, как в приложении. Т.к. после вывода матрицы Вы повторно попадаете в процедуру ввода элементов. Вы вводите число строк и столбцов, которое должно быть меньше-равно 16, но вводие как одну цифру(символ). Дальше код не проверял, но если ещё будут вопросы обращайтесь в мини-форум. Удачи! Приложение: .code 386 main: mov ax,@data mov ds,ax mov ax,03 int 10h ; очистка экрана call vvod_raz ; процедура ввода размерности call vvod_elem ; процедура ввода элементов call vivod_safe ; процедура вывода матрицы mov ax,4c00h int 21h ;выход из программы --------- Итерация от человека, рекурсия — от Бога (Питер Дойч)

Ответ отправил: Зенченко Константин Николаевич (статус: Профессор) Украина, Киев Тел.: +380979536619 Адрес: Украина г.Киев ---- Ответ отправлен: 26.12.2008, 10:59 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 239698 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5 Комментарий оценки: спасибо большое, Вы мне очень помогли.

Отвечает: Airyashov Здравствуйте, Shaman_888! Код: ;---------------------------------------------- mov ax,4c00h int 21h ;выход из программы перенесите до описание процедур

Ответ отправил: Airyashov (статус: Студент) Ответ отправлен: 26.12.2008, 11:46 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 239704 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

© 2001-2008, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале ∙ Версия системы: 5.13 от 01.12.2008
RusFAQ.ru | MosHoster.ru | MosDesigner.ru RusIRC.ru | Kalashnikoff.ru | RadioLeader.ru