99010

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

Курсовая

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

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

Русский

2016-07-22

85.5 KB

1 чел.

Содержание

Введение …………………………………………………………………………………………….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


 

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

45051. Повышение надежности эксплуатации сетей с резистивным заземлением нейтра 1.14 MB
  Номинальное напряжение сети соответствует номинальному напряжению электроприемников подключенных к этой сети. Сети напряжением ниже 1000В называют сетями низкого напряжения НН. Сети напряжением выше 1000В называют сетями высокого напряжения ВН.
45054. Оценка материально-производственных запасов 50.5 KB
  Материально–производственные запасы, на которые текущая рыночная стоимость в течении года снизилась либо которые морально устарели, полностью или частично потеряли свое первоначальное качество, отражаются в бухгалтерском балансе на конец отчетного года за вычетом резерва под снижение стоимости материальных ценностей
45055. Гусеничные тракторы. Технические характеристики 987.4 KB
  По назначению трактора делятся на промышленные сельскохозяйственные и лесопромышленные. Устройство гусеничного трактора. Любая схема гусеничного трактора отображает три основные составные части трактора: двигатель трансмиссию и ходовую часть. Полужесткая ходовая переносит большие нагрузки и облегчает точность управления навесного оборудования при движении трактора.
45056. Нрафик работы и отдыха водителей, производящих автомобильные перевозки грузов по маршруту Екатеринбург-Эрзурум (Турция)-Анталья (Турция) 493.5 KB
  При производстве работ одним водителем время на дорогу занимает 253:48 часа. Два рабочих дня время управления достигает 10 часов. Среднее время управления в неделю 9 часов за смену. При управлении двумя водителями общее время на доставку груза составляет 197:44 часа.
45057. Розрахунок шкали ноніусу для наступних даних 79 KB
  Без достатнього навику похибка відліку, як правило, перевищує ціну ділення ноніусу. Використання лупи не підвищує точності відліку по ноніусу.
45058. Ділові папери як засіб писемної професійної комунікації 92.5 KB
  Ділові папери як засіб писемної професійної комунікації ПЛАН Поняття про документ. Функції документа. Класифікація документів. Ознаки класифікації та види документів.
45059. Документація з кадрово-контрактних питань 77 KB
  Документація з кадровоконтрактних питань ПЛАН Заява. ЗАЯВА Заява – це вид документів з кадрово-контрактних питань. Заява – це офіційне повідомлення в усній доповідь або письмовій документ формі в якому викладається певне прохання рідше пропозиція окремої особи чи організації. Розрізняють два основних види заяв: особиста заява яка містить прохання звертання до керівної посадової особи складається власноручно в одному примірнику; службова заява що укладається посадовою особою від власного імені або від організації...