3.1 Інтерфейс програмного продукту
Запуск програми здійснюється при відкритті файлу в Додатку А МETHOD. exe.
В
Рис.3.1 Основне вікно програми.
Далі потрібно вибрати метод сортування та натиснути на відповідну номером клавішу на клавіатурі.
Після цього програма видасть вихідний масив чисел (генерується випадковим вибором) і відсортований масив (див. рис.3.2).
Щоб протестувати ще один метод, достатньо натиснути "Enter" і вибрати інший номер, що відповідає номеру методу сортування.
Вихід з програми здійснюється натисканням на "0".
В
Рис.3.2 Здійснення процесу сортування
При розробці програми використовувалися такі конструкції мови наведені нижче:
Умова: умова then begin
...
else
цикл, з постійним входженням в цикл: змінна: = 1 to n do оператор;
...;
А так само конструкції виводу і читання даних: ( інформація );// вивід даних (змінна);//читання даних
цикл з передумовою: (умова) do
.
оператор;
.;
оператор вибору умові рівностей значення змінної: мінлива of
значення 1: оператор;
значення 2: оператор;
.
значення n: оператор;
При створення курсової роботи так само користувалася функціями бібліотеки crt.
3.2 Текст програми
Program Kurs; crt; n = 10; Mas = array [1. n] of integer;: Mas;: char; Menu;; ('Виберете метод сортування:'); ('1. бульбашках '); ('2. Вибором'); ('3. вставкою '); ('4 . Шелла '); ('0. Вийти з програми'); (''); ('Автор програми - Орлов Сергій Валерійович');
Writeln; (': & gt; ');; ZapMas; i: integer;;; (' Вихідний масив: '); i: = 1 to n do [i]: = random (20) - 10; (a [i]: 3,' ');;;; Bubble (var item: Mas); {puzirkom}, j: integer;: integer; i: = 2 to n doj: = n downto i doitem [j-1]> item [j] then : = item [j-1]; [j-1]: = item [j]; [j]: = x;;;; Selekt (var item: Mas); {viborom}, j, k: integer;: integer; i: = i to n-1 do: = i;: = item [i]; j: = i +1 to n doitem [j] 0) do [j +1]: = item [j];: = j-1;; [j +1]: = x ;;; Shell;, i, t: integer;: boolean;: = N div 2; d> 0 do: =...