Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Pascal=Assembler

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки

Открыть новую тему     Написать ответ в эту тему

yurassik77



Newbie
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Шапка темы ставит в тупик. Потому как хочется написать, чтоб кто-нибудь объяснил, что делаю не так и в тоже время, это же контрольная... Писать - не писать, вот в чем вопрос!
Сильно не пинайте!
Есть выражение на Pascal:
...  
i:=1;
k:=1024;
repeat
       if ((i*i+k) or 9)=3 then i:=i*(i+k) else k:=k-i
until i>k;
...
Нужно в программе на Pascal совместить решение на Pascal и Assembler и ответы должны сходиться соответственно.
Реализовал программу так:
Подробнее...
Помогите пожалуйста! Укажите на ошибки или напишите как должно быть
 

Всего записей: 2 | Зарегистр. 18-10-2007 | Отправлено: 17:07 21-04-2010
AlexNMelnikov

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Сильно не вникал, да и асм подзабыл порядком.
Вот что вызывает сомнения:
1. зачем вы переменные назвали как регистры. Возможно что в блоке asm вы работаете с регистрами, а выводите значения переменных.
2. Команда mul - Для двухбайтовых операций один из сомножителей помещается в регистр АХ; после выполнения операции произведение записывается в регистры DX:AX (в DX - старшая часть, в АХ - младшая). Предыдущее содержимое регистра DX затирается.
     mov ax,1
     mov dx,1024
@l3: mov cx,ax
     mul ax
     add cx,dx  
Данная последовательность затрет вам DX.

Всего записей: 29 | Зарегистр. 19-02-2007 | Отправлено: 01:27 23-04-2010
Открыть новую тему     Написать ответ в эту тему

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Pascal=Assembler


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru