RFpro.ru: Ассемблер? Это просто! Учимся программировать

Если выпуск не отображается корректно, то вы можете прочесть его на сайте

Рассылки Новости сайта "Упражнения по SQL" (http://www.sql-ex.ru) Сертификация по SQL. Операторы SELECT, INSERT, UPDATE, DELETE. Базы данных, язык манипуляции данными, дистанционное обучение. Запросы онлайн. Рейтинг участников. Форум. Подписаться:   на сайте    по почте

RFpro.ru: Ассемблер? Это просто! Учимся программировать     Мои подписки     Мои группы     Мои новости     Друзья     Избранное Хостинг портала RFpro.ru: Московский хостер Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64 РАССЫЛКИ ПОРТАЛА RFPRO.RU Лучшие эксперты данной рассылки Boriss Статус: Академик Рейтинг: 2521 • повысить рейтинг » Абаянцев Юрий Леонидович aka Ayl Статус: Профессионал Рейтинг: 1998 • повысить рейтинг » vladisslav Статус: 6-й класс Рейтинг: 1230 • повысить рейтинг » / КОМПЬЮТЕРЫ И СОФТ / Программирование / Assembler (Ассемблер) Номер выпуска: 1377 Дата выхода: 27.10.2010, 23:30 Администратор рассылки: Лысков Игорь Витальевич (Старший модератор) Подписчиков / экспертов: 226 / 66 Вопросов / ответов: 1 / 1 Вопрос № 180414: Дорогие эксперты, помогите. Определить, есть ли в массиве L[1..N] значение, равное половине суммы минимального и максимального чисел (т.е. (min +max) / 2) и вывести номер первого значения, если такое число есть, иначе сообщить, что таких значе... Вопрос № 180414: Дорогие эксперты, помогите. Определить, есть ли в массиве L[1..N] значение, равное половине суммы минимального и максимального чисел (т.е. (min +max) / 2) и вывести номер первого значения, если такое число есть, иначе сообщить, что таких значений не найдено. Отправлен: 22.10.2010, 18:49 Вопрос задал: Посетитель - 340752 (Посетитель) Всего ответов: 1 Страница вопроса » Отвечает Зенченко Константин Николаевич (Модератор) : Здравствуйте, Посетитель - 340752! Смотрите приложение. По программе: 1) из-за небольшого диапозона используемых значений: random(20)-10, в ассемблерном коде отсутствует работа с флагами CF , OF и SF; 2) использована команда целочисельного деления со знаком IDIV, делимое должно находится в регистрах DX:AX, т.к. до этого работали только с 16-ти битными регистрами, то значение регистра DX заполняется старшим знаковым битом регистра АХ (трюк №1); 3) индексация элементов массива в ассемблере идет с нуля, в ЯВУ может начинатся с любого номера. С массивом работаем с помощью адресации по базе с индексированием,а выводом значений занимается компилятор PASCAL. Поэтому корректируется значения SI(индекс) и BX(база). При вычислении адреса в памяти [ bx + si ], будет получено нужное значение адреса(трюк №2) текущего элемента и соответсвующий ему, порядковый номер. Если выводится нол ь, то такого элемента нет в массиве. вопросы по программе задавайте в мини-форум. Удачи! Приложение: uses crt; const n=10; var l:array[1..n] of integer; i,num,max,min,sum,s2m:integer; begin clrscr; randomize; {выводим нумерацию} write(\'number:\'); for i:=1 to n do write(i:4); writeln; {создаем и выводим массив} write(\'matrix:\'); for i:=1 to n do begin l[i]:=random(20)-10; write(l[i]:4); end; writeln; {задание на ассемблере начинаем} asm {настраиваемся на массив} lea si,l mov cx, n mov di,si mov bx,si {загружаем преверяемое значение} @01: mov ax,[si] {проверяем с минимальным, если да то запоминаем его индекс} cmp ax,[di] jge @@02 mov di,si {проверяем с максимальным, если да то запоминаем его индекс} @02: cmp ax,[bx] jle @@03 mov bx,si {в цикле переходим к следующему значению} @03: add si,2 loop @@01 {запоминаем значения максимального и минимального элемента} mov ax,[bx] mov max,ax mov bx,[di] mov min,bx {суммируем и запоминаем} add ax,bx mov sum,ax {трюк №1} push ax shl ax,1 pop ax rcr dx,1 mov cl,16 sar dx,cl {делим на два, запоминаем результат} mov bx,2 idiv bx mov s2m,ax {готовимся к поиску совпадения} mov cx,n lea bx,l {трюк №2} mov si,2 sub bx,2 {поиск совпадения в цикле, нашли выходим из цикла} @04: cmp ax,[bx+si] jz @@05 add si,2 loop @@04 {есди попали сюда, то совпадений нет} xor si,si @05: shr si,1 mov num,si end; {задание на ассемблере закончено} {выводим результат} writeln(\'min\',min:5); writeln(\'max\',max:5); writeln(\'sum\',sum:5); writeln(\'div\',s2m:5); writeln(\'num\',num:5); readkey; end. ----- Итерация от человека. Рекурсия — от Бога. — Л. Питер Дойч Ответ отправил: Зенченко Константин Николаевич (Модератор) Ответ отправлен: 22.10.2010, 22:40 Номер ответа: 263619 Украина, Киев Тел.: +38-097-238-60-03 Адрес: Украина, Киев Оценка ответа: 5 Вам помог ответ? Пожалуйста, поблагодарите эксперта за это! Как сказать этому эксперту "спасибо"? Отправить SMS #thank 263619 на номер 1151 (Россия) | Еще номера » Отправить WebMoney: Неплохо (30 руб.) Хорошо (40 руб.) Отлично (55 руб.) БЛЕСТЯЩЕ! (80 руб.) Оценить выпуск » Нам очень важно Ваше мнение об этом выпуске рассылки! Задать вопрос экспертам этой рассылки » Скажите "спасибо" эксперту, который помог Вам! Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА на короткий номер 1151 (Россия) Номер ответа и конкретный текст СМС указан внизу каждого ответа. Полный список номеров » * Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов) ** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются. *** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании. © 2001-2010, Портал RFPRO.RU, Россия Авторское право: ООО "Мастер-Эксперт Про" Автор: Калашников О.А. | Программирование: Гладенюк А.Г. Хостинг: Компания "Московский хостер" Версия системы: 2010.6.22 от 18.10.2010 Обсудить выпуск

Как вам этот выпуск ?  Дайте свой отзыв  или  Оцените   5    4    3    2    1,   можно письмом:  5    4    3    2    1

Реклама Отказаться от рекламы Здоровая пища: миф или реальность? Аэрогриль Flavorwave Turbo Oven - новое слово в кухонном досуге!   Зима полна опасностей? С шинами Goodyear об одной из них можно забыть! Goodyear - вместе безопаснее   Надоела сутулая спина и обвислый живот? Тренажер Ab Rocket - великолепный пресс всего за несколько недель!

Группы «Семейное право и права детей в России» Получение и обмен информацией, свободное консультирование по темам семейного права, жилищного права супругов, наследственного права, прав детей и всех аспектов правового регулирования семейных отношений и социальной политики «Фото. Пейзаж» В этой группе публикуются и обсуждают фотопейзажи. Цветочки и бабочки пейзажем не являются! Разрешается публиковать только СВОИ фотографии. Любая агресс... «Единство всего мира и понимание его» Единство всего мира - это идея признанная наукой экологией более полувека. Однако, впервые эта идея была обнародована более 3300 лет тому назад в пятикн...

Подписан адрес: admin10383.deep@blogger.com Код этой рассылки: comp.prog.assembler Архив рассылки Отписаться:  На сайте  Почтой Поддержка подписчиков Убрать рекламу Другие рассылки этой тематики Другие рассылки этого автора Рассылка производится: Subscribe.Ru / ЗАО «Интернет-Проекты» / О компании / Политика конфиденциальности