99010

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

Курсовая

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

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

Русский

2016-07-22

85.5 KB

0 чел.

Содержание

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


 

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

932. Расчеты горения топлива 139 KB
  Расчёт теплоты сгорания топлива. Определение теоретически необходимого и фактического расхода воздуха. Определение выхода и состава продуктов горения. Определение теоретической и действительной температуры горения.
933. Расчет нагрева металла 256.5 KB
  Расчет времени нагрева металла в методической зоне. Средняя температура металла по сечению. Расчет времени нагрева металла в сварочной зоне. Расчет времени томления металла.
934. Тепловой баланс 558.5 KB
  Температура внутренней поверхности кладки. Потери теплоты через футеровку. Потери теплоты через окна. Теплота экзотермических реакций. Температура уходящих из томильной зоны газов. Потери теплоты с охлаждающей жидкостью. Температуру внутренней поверхности стен.
935. Рекуператор. Поверхность нагрева металлического петлевого рекуператора 97.5 KB
  Определение поверхности нагрева металлического петлевого рекуператора для подогрева воздуха. Коэффициент теплоотдачи конвекцией от труб рекуператора к воздуху. Отношение коэффициентов теплоотдачи на стороне воздуха и продуктов сгорания.
936. Горелки томильных печей 54.5 KB
  Для осуществления равномерного нагрева свода принимаем шахматное расположение горелок на своде печи с шагом по длине 1463 мм и 1410 мм по ширине. Тогда в методической зоне будет 4, в сварочной 7 и томильной 3 горелки.
937. Газодинамические расчеты газо-воздушных трактов 118.5 KB
  Скорость движения дымовых газов в начале печи. Скорость движения продуктов горения в вертикальном канале. Потери давления на повороте из дымохода в вертикальный канал. Средняя температура дыма по длине трубы.
938. Разработка маршрутно-операционного технологического процесса изготовления детали Крышка 378 KB
  Технический анализ чертежа детали и его корректировка в соответствие со стандартами ЕСКД. Составление технологического маршрута обработки, включая термические и контрольные операции. Расчет суммарной погрешности выполнения одного операционного размера, с учетом действия различных технологических факторов.
939. Управление делами Аппарата Администрации Смоленской области г. Смоленск, площадь им. Ленина, 1 311.5 KB
  Общая характеристика Аппарата Администрации Смоленской области. Основные задачи и функции протокольного отдела. Управление делами Аппарата Администрации Смоленской области. Функциональное содержание управленческой деятельности на примере протокольного отдела Управления делами Аппарата Администрации Смоленской области.
940. Исследование основных параметров и схем включения операцион-ных усилителей 231.5 KB
  В ходе работе были определены параметры операционного усилителя К140УД7 на лабораторном стенде и его зарубежного аналога uA741C в среде моделирования Microcap9: коэффициент усиления ОУ без обратной связи, входные токи, входное напряжение смещения, коэффициент ослабления синфазного сигнала.