42548

Сортування методом вставок

Лабораторная работа

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

Завдання: розробити програму, що забезпечує сортування вхідного файлу методом вставок. Вхідний файл містить в собі двовимірний масив чисел цілого типу, всі елементи якого слід відсортувати за зростанням, причому зробити це окремо в кожному стовпці.

Украинкский

2013-10-30

29.5 KB

2 чел.

Міністерство освіти і науки України

Хмельницький національний університет

Кафедра системного програмування

Лабораторна робота №1

З дисципліни структури даних і алгоритми

Тема: 

«Сортування методом вставок»

 

                                                                                       Виконав ст. гр. КІ-10-3

                                                                    Матвєєв П.

       Перевірив Кльоц Ю. П.

Хмельницький 2011

Завдання: розробити програму, що забезпечує сортування вхідного файлу методом вставок. Вхідний файл містить в собі двовимірний масив чисел цілого типу, всі елементи якого слід відсортувати за зростанням, причому зробити це окремо в кожному стовпці.

Лістинг програми:

uses crt;

const n=8;

type mas=array[1..n,1..n] of integer;

var m:mas;

    i,j: integer;

    t: text;

procedure gen(var m:mas; var t:text);

var i,j:integer;

 begin

 randomize;

 rewrite(t);

 for i:=1 to n do begin

 for j:=1 to n do begin

 m[i,j]:=random(10);

 write(t,m[i,j],' ');

 end;

 writeln(t);

 end;

 close(t);

end;

procedure sort(var m:mas; var j:integer);

var i,k,temp,p:integer;

    tmas:array[1..n] of integer;

 begin

 for i:=1 to n do tmas[i]:=m[i,j];

 for k:=2 to n do begin

  temp:=tmas[k]; p:=k-1;

  While (p>0) and (temp<tmas[p]) do begin

   tmas[p+1]:=tmas[p];p:=p-1;

   end;

  tmas[p+1]:=temp;

 end;

 for i:=1 to n do m[i,j]:=tmas[i];

 end;

 procedure regen(var m:mas; var t:text);

 var i,j:integer;

  begin

  rewrite(t);

  for i:=1 to n do begin

  for j:=1 to n do begin

  write (t,m[i,j],' ');

  end;

  writeln(t);

  end;

  close(t);

 end;

begin

assign(t,paramstr(1));

gen(m,t);

for j:=1 to n do sort(m,j);

regen(m,t);

end.

Результат:

Вміст вихідного файлу:

0 4 0 0 0 1 0 0

2 6 0 1 1 2 0 2

3 6 1 3 1 3 1 2

3 7 2 3 6 4 1 4

4 7 5 5 6 5 1 5

5 7 5 6 7 5 2 5

8 7 6 9 8 7 3 7

9 8 7 9 9 7 9 9


 

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

27563. Сущность права. Классовое и общечеловеческое в праве 28 KB
  Сущность права – это главная внутренняя относительно устойчивая качественная основа права которая отражает его истинную природу и назначение в обществе Основные подходы к пониманию сущности права: 1 сущность права – это возведенная в закон воля той социальной группы которая обладает реальной государственной властью марксистколенинская теория. 2 сущность права – это социальная свобода соединенная с социальной ответственностью. 3 сущность права – это реальное общественное отношение которое складывается в социальнонеоднородном обществе.
27564. Теория государства и права в системе юриспруденции. Место в системе других социальных наук 30 KB
  В свою очередь юридические науки можно условно поделить на четыре основные группы: – общая теория государства и права; – историкоправовые науки; – отраслевые науки; – прикладные науки криминалистика судебная медицина психиатрия. Особенность теории государства и права как науки состоит в том что она является: – гуманитарной наукой предметом изучения которой составляют общественные явления – право и государство. Этой особенностью она отличается от других наук – естественных и технических; – политикоюридической наукой изучающей такие...
27565. Теория и практика формирования правового государства в России 29.5 KB
  Теория правового государства насчитывает многовековую историю. Многие мыслители начиная с античной древности и вплоть до наших дней занимаются проблемой создания рационального государства которое отвечало бы представлениям людей о свободе и справедливости законности и демократии. В числе ученых философов и правоведов принимавших участие в выработке и обосновании теории правового государства необходимо упомянуть Аристотеля Платона Полибия Ш.
27566. Типология государств (Кельзена, Еллинека) 27.5 KB
  Типология государств Кельзена Еллинека. Типология государства – традиционно рассматривают как теория учение о типах государств когдалибо существовавших в истории человеческого общества или существующих в настоящее время. Типология государства – это процесс систематизации государств с учетом их сущностных свойств для повышения эффективности в теоретической и практической деятельности по изучению государства и правоприменения. Под типом государства понимаются взятые в единстве общие черты различных государств система их важнейших...
27567. Типология государства: формационный подход 31 KB
  Типология государства: формационный подход. Типология государства – традиционно рассматривают как теория учение о типах государств когдалибо существовавших в истории человеческого общества или существующих в настоящее время. Типология государства – это процесс систематизации государств с учетом их сущностных свойств для повышения эффективности в теоретической и практической деятельности по изучению государства и правоприменения. Тип государства и права ставится в зависимость от типа общественноэкономической формации.
27568. Тоталитаризм в системе антидемократических политических режимов 24.5 KB
  Тоталитаризм в системе антидемократических политических режимов. Государственнополитический режим это элемент формы государства характеризующий совокупность приемов методов способов и средств осуществления государственной власти. В научной литературе большинство авторов выделяют два вида политического режима: демократический и антидемократический. Антидемократический политический режим представляет собой противоположность демократическому и характеризуется отсутствием демократических прав и свобод; запретом деятельности политических...
27569. Укажите, какие из перечисленных событий и действий являются юридическими фактами (солнечное затмение, назначение на должность, создание литературного произведения) 26.5 KB
  Юридические факты это конкретные жизненные обстоятельства с которыми норма права связывает возникновение изменение и прекращение правоотношений. Виды ЮФ: По последствиям: правообразующие влекут возникновение правоотношений; правоизменяющие влекут изменение правоотношений; правопрекращающие влекут прекращение правоотношений. По форме проявления: положительные обстоятельства требующие их наличия для возникновения правоотношений; отрицательные обстоятельства требующие их отсутствия для возникновения правоотношений.
27570. Укажите, что является основанием деления права на отрасли 26 KB
  В основе деления права на отрасли лежат предмет и метод правового регулирования. Каждая отрасль права регламентирует свой особый участок сферу общественных отношений однопорядкового характера однородных своеобразие которых позволяет отличать одну отрасль права от другой. Но предмет правового регулирования не может быть единственным критерием деления права на отрасли так как общественные отношения разнообразны и часто одни и те же общественные отношения регулируются различными отраслями и способами.
27571. Федерация как особая форма государственного устройства 23.5 KB
  Федерация как особая форма государственного устройства. Форма государственного устройства – территориальная организация государственной власти или иными словами внутреннее строение государства деление его на составные части. По форме государственного устройства государства могут быть простыми и сложными.