| ← Ноябрь 2011 → | ||||||
|
1
|
2
|
6
|
||||
|---|---|---|---|---|---|---|
|
7
|
8
|
10
|
11
|
12
|
13
|
|
|
15
|
16
|
19
|
20
|
|||
|
22
|
23
|
24
|
25
|
26
|
27
|
|
|
28
|
29
|
30
|
||||
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://rusfaq.ru
Открыта:
28-06-2000
Статистика
0 за неделю
RFpro.ru: Ассемблер? Это просто! Учимся программировать
Хостинг портала RFpro.ru: РАССЫЛКИ ПОРТАЛА RFPRO.RU
Лучшие эксперты по данной тематике
/ КОМПЬЮТЕРЫ И СОФТ / Программирование / Assembler (Ассемблер)
Консультация # 184425: Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос: В массиве А[1..28] определить максимальное значение. Все элементы, лежащие до максимального, увеличить на первое значение массива, а все числа, после максимального, рассортировать по убыванию. Программу реализовать в виде четырех связок:... Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос:
Дата отправки: 12.11.2011, 11:40 Консультирует Лысков Игорь Витальевич (Старший модератор): Здравствуйте, Посетитель - 385274! Код : .386 .model flat, stdcall option casemap :none .code ;самое маленькое целое число (для поиска максимума) LONG_MIN equ -2147483648 ;модуль на Ассемблере ;параметры - адрес массива dword-ов и их количество public doAsm doAsm proc uses esi edi ebx, pInt:dword, count:dword ;ищем максимум mov ebx, pInt ;адрес масива mov ecx, count ;количество jcxz doRet ;=0 - ничего не делаем xor esi, esi ;индекс в массиве mov edx, LONG_MIN ;max maxLoop: mov eax, [ebx+esi*4];очередной элемент cmp eax, edx ;сравниваем jle maxNext ;сохраняем, если больше максимального mov edi, esi ;индекс mov edx, eax ;значение maxNext: inc esi ;индекс следующего loop maxLoop ;по всем ;прибавим к элементам до максимального значение первого mov ecx, edi ;индекс максимального jcxz sortAfter ;если первый, то ничего не делаем mov eax, [ebx] ;первый xor esi, esi ;индекс addBefore: add [ebx+esi*4],eax ;добавляем inc esi ;на следующий loop addBefore ;сортируем "пузырьком" по убыванию элементы за максимальным sortAfter: lea esi, [edi+1] ;начальный индекс области сортировки mov ecx, count ;общее количество sub ecx, esi ;ecx - число сортируемых элементов cmp ecx, 2 ;0 и 1 нет смысла сортировать jb doRet dec ecx ;число сравнений sortLoop: ;цикл по поиску очередного минимального lea edi, [esi+1] ;начинаем со следующего push ecx ;сохраним счетчик mov eax, [ebx+esi*4];текущий минимальный по индексу esi searchMinLoop: ;цикл по всем последующим ;сравниваем текущий со всеми последующими cmp eax, [ebx+edi*4];если текущий минимальный >= последующего, jge sortNext ; то обходим обмен ;меняем местами элементы xchg eax, [ebx+edi*4];меняем местами mov [ebx+esi*4], eax;по индексу esi и в eax новый минимальный sortNext: inc edi ;на следующий последующий loop searchMinLoop inc esi ;на следующий текущий pop ecx ;восстановим счетчик сравнений loop sortLoop doRet: ret doAsm endp end "Обработка на языке высокого уровня" - doC.cpp Код : #define LONG_MIN -2147483647
//то же самое, что и в модуле на Ассемблере
extern "C" void _stdcall doC(int * pInt, int count)
{
int max = LONG_MIN;
int i,j,k,idxMax;
if (count)
{
//ищем максимальный
for (i=0; i<count; i++)
{
if (pInt[i] > max)
{
idxMax = i; //индекс максимального
max = pInt[i]; //значение
}
}
j = pInt[0]; //первый
for (i=0 ; i<idxMax; i++)
pInt[i] += j; //добавляем первого до элементов слева
//сортируем "пузырьком" элементы справа
for (i=idxMax+1; i<count-1; i++)
{
for (j=i+1; j<count; j++)
{
if (pInt[i] < pInt[j])
{
k = pInt[i];
pInt[i] = pInt[j];
pInt[j] = k;
}
}
}
}
}
"Ввод-вывод на языке низкого уровня" - main.asm c вызовом модуля на Асм (вызов модуля на С задается заменой вызова doAsm на doC) Код : .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 StdOut PROTO :DWORD doAsm PROTO :DWORD, :DWORD .data ;данные A dd 123, -23, -567, 0, 234, 345, 34, 2, 1, 23, 9, 70, 91, 101 dd 400, 76, -4, -45, 38, 55, 100, 0, 39, 12, 5, 8, 150, 17 lenA equ ($-A)/4 sA db 'A = ',0 format db '%d ',0 sEOL db 0dh,0ah,0 .code main proc local buffer[64]:byte ;буфер для преобразования числа в строку invoke doAsm, addr A, lenA ;вызываем модуль на Asm invoke StdOut, addr sA ;выводим "А = " ;выводим все элементы массива mov ecx, lenA ;длина массива xor esi, esi ;индекс printLoop: push ecx ;преобразуем один элемент в строку invoke wsprintf, addr buffer, addr format, dword ptr A[esi*4] ;выведем invoke StdOut, addr buffer inc esi ;индекс слкдующего pop ecx loop printLoop ;по всем invoke StdOut, addr sEOL ;перевод строки invoke ExitProcess, NULL main endp StdOut proc lpszText:DWORD ;вывод строки на стандартное выходное устройство LOCAL hOutPut :DWORD, bWritten:DWORD, len:DWORD ;получаем handle устройства invoke GetStdHandle,STD_OUTPUT_HANDLE mov hOutPut, eax ;получаем длину строки invoke lstrlen,lpszText mov len, eax ;выводим invoke WriteFile,hOutPut,lpszText,len,ADDR bWritten,NULL mov eax, bWritten ret StdOut endp end main "Ввод-вывод на языке высокого уровня" - main.cpp c вызовом модуля на C (вызов модуля на Asm задается заменой вызова doC на doAsm) Код : #include <stdio.h>
extern "C" void _stdcall doC(int *, int);
//массив
int A[28] = {123, -23, -567, 0, 234, 345, 34, 2, 1, 23, 9, 70, 91, 101,
400, 76, -4, -45, 38, 55, 100, 0, 39, 12, 5, 8, 150, 17};
int main()
{
int count = sizeof(A)/sizeof(int); //число элементов
doC(A, count); //вызываем модуль на С
printf ("A = "); //выводим "А = "
for(int i=0; i<count; i++)
{
printf("%d ",A[i]); //выводим все элементы через пробел
}
printf("\n");
return 0;
}
Все четыре проекта - Asm_Cpp.rar (11.3 кб)
Оценить выпуск | Задать вопрос экспертам
главная страница
|
стать участником
|
получить консультацию
© 2001-2011, Портал RFPRO.RU, Россия
Авторское право: ООО "Мастер-Эксперт Про" Калашников О.А. | Гладенюк А.Г. Хостинг: Компания "Московский хостер" Версия системы: 2011.6.33 от 10.09.2011 |
| В избранное | ||
