99010

Сортировка массива по убыванию

Курсовая

Информатика, кибернетика и программирование

Ассемблер – один из самых старых из существующих сегодня языков программирования. Все процессы в машине на самом низком, аппаратном уровне приводятся в действие только командами машинного языка. Символическое представление машинного языка – это и есть ассемблер

Русский

2016-07-22

85.5 KB

4 чел.

Содержание

Введение …………………………………………………………………………………………….3

Постановка задачи ………………………………………………………………………………….4

Метод решения ……………………………………………………………………………………..5

Описание программы ………………………………………………………………………………6

Руководство системного программиста …………………………………………………………..7

Руководство программиста ………………………………………………………………………..8

Руководство оператора ……………………………………………………………………………..9

Алгоритмическая часть……………………………………………………………………………..10

Список литературы …………………………………………………………………………………12

Приложение …………………………………………………………………………………………13

Тестирование программы ………………………………………………………………………….16

Введение

Ассемблер – один из самых старых из существующих сегодня языков программирования. Все процессы в машине на самом низком, аппаратном уровне приводятся в действие только командами машинного языка. Символическое представление машинного языка – это и есть ассемблер. По-настоящему решить проблемы, связанные с аппаратурой, невозможно без знания ассемблера. И не случайно практически все компиляторы языков высокого уровня  содержат средства связи  своих модулей с модулями на ассемблере либо поддерживают выход на ассемблерный уровень программирования.

Писать достаточно объёмные программы на ассемблере довольно утомительно, поэтому становится актуальным способ программирования с использованием комбинирования программ на языке высокого уровня с кодом на ассемблере. Такой путь обычно избирается в том случае, если в программе есть участки, которые либо невозможно реализовать без использования ассемблера, либо его применение может значительно повысить эффективность работы программы.

Данная курсовая работа написана с использованием вышеописанного метода программирования.  

Постановка задачи

Задание: отсортировать массив по убыванию. Отрицательные элементы остаются  на своих местах.

Исходный массив находится во внешнем файле data.txt. Результат, отсортированный по убыванию массив, выводится на экран.

Метод решения

Сортировка массива производится методом перестановки. По очереди сравниваются два соседних элемента и, если порядок их следования не удовлетворяет нашему условию (сортировка по убыванию), они меняются местами.

Описание программы

     Программа состоит из двух модулей, написанных:

  •  на языке Turbo Pascal;
  •  на языке ассемблера.

          Главный модуль реализован на языке Turbo Pascal. Этот модуль выполняет следующие действия.

  1.  Открывает файл с исходными данными.
  2.  Считывает этот файл.
  3.  Выводит на экран исходный и отсортированный массивы.

              Модуль на языке ассемблера реализует сортировку массива.

Руководство системного программиста

 

Общие сведения о программе

           Программа сортировки массива написана с использованием метода комбинирования модулей на языках Turbo Pascal и ассемблер.

Структура программы

Структурно программа состоит из главного модуля написанного на языке Turbo Pascal и вызываемого им модуля, написанного на ассемблере. Главный модуль содержит интерфейсные процедуры и функции (открытие файла, чтение файла, вывод исходных данных и результата на экран). Модуль, написанный на ассемблере, выполняет сортировку массива.            

Проверка программы

Результаты проверки приведены в приложении.

Руководство программиста

 Назначение и условия применения программы

           Программа предназначена для сортировки массива.

          Обращение к программе

           Обращение к программе производится через командную строку без параметров.

Руководство оператора

 Назначение программы

           Программа предназначена для сортировки массива по убыванию.  Она выводит на экран исходный массив и результат работы программы (отсортированный по убыванию массив).

            Условие выполнения программы

             Необходимым условием выполнения программы является ввод исходных данных в файл data.txt, при чем первым должно быть число элементов массива.

             Выполнение программы

              Выполнение программы происходит после запуска из командной строки без параметров.

Алгоритмическая часть

Схема алгоритма модуля написанного на ассемблере

Список литературы

1.Пильщиков В.Н. Программирование на языке ассемблера IBM PC.– М.: Диалог-МИФИ 1994.

2.Юров В. Assembler.-Санкт-Петербург,2000.

3.Фаронов В.В. Turbo Pascal 7.0. Москва, издательство «Нолидж».

Приложение

Листинг главного модуля, написанного на Turbo Pascal

uses Crt;

var

 kl,j,k:integer;

 mas:array[1..20] of integer;

 F:Text;

procedure  asmproc(var mas;n:integer);external;

{$L maxu.obj}

begin

 clrscr;

 assign(f,'data.txt');

 reset(f);

 readln(f,kl);

 WriteLn('Unsorted vector:');

 for j:=1 to kl do

 begin

   readln(f,mas[j]);

   write(mas[j],' ');

 end;

   writeln;

 close(f);

asmproc(mas,kl);

WriteLn('Sorted (>0) vector:');

 for j:=1 to kl do

   write(mas[j],' ');

 writeln;

 readln;

end.

Листинг модуля, написанного на ассемблере

MASM

MODEL small

STACK 256

.data

t dw 0

j dw 0

i dw 0

.code

main:

asmproc  proc

PUBLIC  asmproc

     push   bp               

     mov    bp,sp            

     push   ds               

     cld

     les    bx,[bp+08]        ;адрес массива

     mov    si,bx             ;запомнить адрес

     mov    t,si              

loc0: mov    di,t              ;новый цикл

loc1: mov    ax, [di]          ;[di]->ax

     shr    ax,15             ;проверим положительно ли?

     cmp    ax,0

     je     loc2              ;если да то

     mov    ax,di             ;si<>N

     sub    ax,si

     mov    dx,[bp+06]

     add    dx,[bp+06]

     sub    dx,2

     cmp    ax,dx  

     jae    loc5              ;внутренний цикл закончен

     add    di,2              

     jmp    loc1

loc2: cmp    si,di             ;di<>si

     je     loc3              ;если =

     mov    ax,[di]           ;иначе проверить элементы >=

     cmp    ax,[si]

     jbe    loc3

     mov    ax,[di]           ;перестановка

     mov    bx,[si]

     mov    [si],ax

     mov    [di],bx

loc3: mov    ax,di             ;si:=di

     mov    si,ax

     mov    dx,[bp+06]

     add    dx,[bp+06]

     add    dx,t

     Sub    dx,2

     mov    bx,si

     cmp    bx,dx             ;если si<>N

     jne    loc4              ;то на loc4

loc5: add    j,1

     mov    bx,[bp+06]

     sub    bx,1

     cmp    bx,j

     jle    endc       

     jmp    loc0

loc4: add    di,2

     jmp    loc1

endc: pop ds

     pop bp

     ret  

asmproc  endp                            ;конец процедуры

end

   

Тестирование программы.

  1.  Содержание файла data.txt

<======CUT=========>

5

12

-4

4

-12

45

<======CUT=========>

Результат

Unsorted vector:

-12 -4 4 -12 45

Sorted vector:

45 -4 12 -12 4

  1.  Содержание файла data.txt

<======CUT=========>

5

48

-5

1

-7

100

<======CUT=========>

Результат

Unsorted vector:

48 -5 1 -7 100

Sorted vector:

100 -5 48 -7 1

16


 

А также другие работы, которые могут Вас заинтересовать

65578. РЕГІОНАЛЬНІ ОСОБЛИВОСТІ РОЗВИТКУ ТРАНСКОРДОННОГО СПІВРОБІТНИЦТВА 536.5 KB
  Сучасний період світової історії що характеризується новітніми тенденціями євроінтеграції та глобалізації відзначився новим поглядом країн на потреби особливості та потенціал розвитку своїх територій.
65579. СИСТЕМА ПІДТРИМКИ ПРИЙНЯТТЯ РІШЕНЬ ДЛЯ АВТОМАТИЗАЦІЇ ПРОЦЕСУ КЕРУВАННЯ РУХОМ ДИЗЕЛЬ-ПОЇЗДА 297 KB
  Тому розробка з метою автоматизації процесів керування системи підтримки прийняття рішень для машиніста дизельпоїзда вітчизняного виробництва з новим тяговим електроприводом на основі асинхронних двигунів є безсумнівно актуальним завданням що визначає напрямок...
65580. Обгрунтування параметрів землезберігаючих технологій при відкритій розробці розсипних родовищ титанових руд і бурштину 238.5 KB
  Карєри фабрики збагачення і хвостосховища будуються на значній відстані одне від одного що погіршує технікоекономічні показники підприємств. Метою роботи є обґрунтування параметрів землезберігаючих технологій відкритої розробки обводнених розсипних родовищ...
65581. СПІВВІДНОШЕННЯ РОЗСУДКУ І РОЗУМУ: ФІЛОСОФСЬКО-ПЕДАГОГІЧНИЙ КОНТЕКСТ 263 KB
  Чому власне співвідношення розсудку і розуму розглядається як філософсько-педагогічна проблема Наша освіта відчайдушно загрузла у болоті розсудкових форм і не менш розсудкових інноваційних симулякрів бездумних реформувань.
65582. Методи нечіткої кластеризації політематичних текстових документів 641.5 KB
  Вирішення таких задач можливе за допомогою методів кластеризації що дозволяють розбивати множину webсторінок на категорії залежно від характеристик даних документів. Слід зазначити що більшість web-сторінок є політематичними текстовими документами тобто одночасно...
65583. РОЗВИТОК ТЕОРІЇ І МЕТОДІВ МАТЕМАТИЧНОГО МОДЕЛЮВАННЯ РЕЖИМІВ РОБОТИ ЕЛЕКТРИЧНИХ СИСТЕМ З НЕСИМЕТРІЄЮ 843 KB
  Розв’язання таких задач принципово можливо на основі переходу до математичних моделей, що використовують рівняння у фазних координатах. Перейти до більш повних і точних моделей на основі рівнянь у фазних координатах, що враховують електромагнітний і електростатичний...
65584. РОЗВИТОК У КЕРІВНИКІВ ОПЕРАТИВНО-РОЗШУКОВИХ ПІДРОЗДІЛІВ ДЕРЖАВНОЇ ПРИКОРДОННОЇ СЛУЖБИ УКРАЇНИ ЗДАТНОСТІ ДО САМОРЕГУЛЯЦІЇ ПСИХІЧНОЇ СТІЙКОСТІ В ЕКСТРЕМАЛЬНИХ УМОВАХ 235 KB
  За оцінкою експертів у рейтингу якостей керівника ОРП ДПСУ найважливішою є здатність до саморегуляції в екстремальних умовах професійної діяльності. З огляду на це керівник ОРП повинен бути емоційно стриманим уміти контролювати себе тобто мати високий рівень саморегуляції...
65585. СТРУКТУРА ТА МЕХАНІЧНІ ВЛАСТИВОСТІ БАГАТОШАРОВИХ КОМПОЗИТІВ МІДЬ –ТАНТАЛ, ОТРИМАНИХ МЕТОДОМ ДИФУЗІЙНОГО ЗВАРЮВАННЯ 457.5 KB
  Для досягнення поставленої мети виникла необхідність у вирішенні таких основних задач: вибір металу проміжного між міддю та танталом шару та методів виготовлення мідних та проміжних шарів; встановлення технологічних параметрів дифузійного зварювання які забезпечували б надійний адгезійний...
65586. Діагностика процесу чистового шліфування по динаміці зміни вихідних змінних 454.5 KB
  Вирішення перелічених завдань має особливе значення для операцій шліфування при виконанні яких на якість і продуктивність впливають збурюючи дії і зміни параметрів технологічної системи. Операція настроюється на найгірший стан системи і середовища.