Сортировка массивов
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
сортированный массив целых чисел на экран, затем выполняет его сортировку методом быстрой сортировки с разделением по невозрастанию и выводит отсортированный массив на экран.
program Quck_sort;Crt;Count=20;: array [1..Count] of byte=(9, 11, 12, 3, 19, l, 5, 17, 10, 18, 3, 19, 17, 9, 12, 20, 20, 19, 2, 5);,A: integer;QuickS(First,Last:integer);I,J,X,W,L:integer;:=First;:=Last;:=M[ (First+Last) div 2];M[I]>X do I:=I+1;X>M[J] do J:=J-1;:=A+1;K=J then:=M[i]; [I]:=M[J]; [J]:=W;:=I+1;:=J-1;L := 1 to Count do WriteC ' ,M[L] ); ( 'Число итераций=' ,A);
end;I>J;First<J then QuickS(First, J);I<Last then QuickS(I,Last);; ;('Исходный массив:'); Writeln;I:=l to Count do Write (M[I]:3,' '); Writeln;:=0;(1,Count);('Отсортированный массив:'); Writeln;I:=l to Count do Write (M[I]:3,' '); Writeln;.
Задача 4. Составить программу, которая формирует двумерный массив случайных чисел и вычисляет значение среднего арифметического его элементов, больших, чем 20. Решение задачи сводится к последовательному перебору всех элементов массива с вычислением суммы тех элементов, значение которых больше, чем 20, а по окончании их суммирования - к вычислению частного полученной суммы и количества элементов массива, удовлетворяющих условию суммирования.
program Preobr_Mas_2;;Strok=10;=Strok;: array [1. .Strok, 1. .Stolb] of integer; , C: array [1. .Strok*6] of integer;, J, X,Y: integer;;;I:= 1 to Strok doJ:= 1 to Stolb do [I, J] :=Random(99) ;(A[ I, J] :2, ' ');;;;;:= 0;:= 0;I:=1 to Strok doJ:= 1 to Stolb doJ >=I then:= X+1;[X] := A[I,J];:= Y+1;
C[Y] := A[I,J];
end;
Writeln('Элементы расположенные на главной диагонали и выше: ');
for I:=1 to X do Write(B[I]:2,' '); Writeln;('Элементы, расположенные ниже главной диагонали: ') ;
for I:=1 to Y do Write(C[I]:2,' '); Writeln;;.
ЗАКЛЮЧЕНИЕ
Для реализации различных методов сортировки необходимо применить алгоритмические языки программирования, такие как: Delphi, Pascal. Применение различных языков программирования, в данной курсовой работе, необходимо для понимания самого алгоритма без привязки к лексике языка программирования.
В результате выполнения курсового проекта были написаны программы, выполняющие сортировку массивов различными методами. Программы обладают высокими параметрами быстродействия, маленькими размерами и не требовательны к системным ресурсам компьютера
СПИСОК ИСПОЛЬЗОВАННОЙ ЛИТЕРАТУРЫ
1.Абрамов. С.А., Зима Е.В. Начала программирования на языке Паскаль. - М.: Наука, 1987.- 112с.
.Абрамов С.А., Гнездилова Г.Г., Капустина Е.Н., Селюн М.И. Задачи по программированию. - М.Наука, 1988. - 224 с.
.Алексеев Е.С., Мячев А.А. Англо-русский толковый словарь по системотехнике ЭВМ. - М.: Финансы и статистика, 1993. - 256 с.
.Борковский А.Б. Англо-русский словарь по программированию и информатике (с толкованиями). - М.: Русский язык, 1990. - 333 с.
.Васюкова Н.Д., Тюяева В.В. Практикум по основам программирования. Язык Паскаль: Учеб. пособ. для учащихся средн. спец. уч. завед. М.Высшая школа, 1991.- 160с.
.Вирт Н. Язык программирования Паскаль // Алгоритмы и организация решения экономических задач.
.Вирт Н. Алгоритмы + структуры данных = программы: Пер. с англ. - М.: Мир, 1985. - 406 с,
.Григас Г. Начала программирования: Книга для учащихся : Пер. с лит. / Под ред. Ю.А.Первина. - М.: Просвещение, 1987.-112 с.
.Грогоно П. Программирование на языке Паскаль : Пер. с англ. - М.: Мир, 1982. -382с.
.Дагене В.А., Григас Г.К., Аугутис К.Ф. 100 задач по программированию: Кн. для учащихся: Пер. с лит. - М.: Просвещение, 1993. - 255 с.
.Дал. У., Дейкстра Э., Хоор К. Структурное программирование: Пер. с англ. - М.: Мир, 1975.-247 с.
.Довгаль С.И., Литвинов Б.Ю., Сбитнев А.И. Персональные ЭВМ: Турбо Паскаль v7.0, Объектное программирование, локальные сети (учебное пособие). - Киев: Информсис-тема сервис, 1993. - 461 с.
.Информатика: Энциклопедический словарь для начинающих. Сост. Д.А.Поспелов. - М: Педагогика-Пресс, 1994. - 352 с.
.К.Йенсен, Н.Вирт. Руководство для пользователя и описание языка Паскаль. - М.: Финансы и статистика, 1982. - 150 с.
.Математический энциклопедический словарь /Гл. ред. Ю.В Прохоров. - М.: Советская энциклопедия, 1988. - 847 с.
.Нортон П., Уилтон Р. 1ВМ РС РЗ/2. Руководство по программированию: Пер. с англ. - М.: Радио и связь, 1994. - 336 с.
.Перминов О.Н. Язык программирования Паскаль. - М.: Радио и связь, 1988. - 220 с.
18.Першиков В.И., Савинков В.М. Толковый словарь по информатике. - М.: Финансы и статистика, 1995. - 544 с.