19.Модуль в языке Pascal. Его структура.

Модуль(UNIT) в Pascal – это особым образом оформленная библиотека подпрограмм. Модуль, в отличие от программы, не может быть запущен на выполнение самостоятельно, он может только участвовать в построении программ и других модулей.

Модуль в Pascal представляет собой отдельно хранимую и независимо компилируемую программную единицу.

Все программные элементы модуля можно разбить на две части:

1) программные элементы, предназначенные для использования другими программами или модулями, такие элементы называют видимыми вне модуля;

2) программные элементы, необходимые только для работы самого модуля, их называют невидимыми (или скрытыми).

unit <имя модуля>; {заголовок модуля}

interface

{описание видимых программных элементов модуля}

implementation

{описание скрытых программных элементов модуля}

begin

{операторы инициализации элементов модуля}

end.

Для обращения к переменной, описанной в модуле, необходимо применить составное имя, состоящее из имени модуля и имени переменной, разделенных точкой.

Рекурсивное использование модулей запрещено. Перечислим, какие бывают виды модулей.

1. Модуль SYSTEM.

Модуль SYSTEM реализует поддерживающие подпрограммы нижнего уровня для всех встроенных средств, таких как ввод-вывод, работа со строками, операции с плавающей точкой и динамическое распределение памяти.

2. Модуль DOS.

Модуль Dos реализует многочисленные процедуры и функции Pascal, которые эквивалентны наиболее часто используемым вызовам DOS, как, например, GetTime, SetTime, DiskSize и так далее.

3. Модуль CRT.

Модуль CRT реализует ряд мощных программ, предоставляющих полную возможность управления средствами компьютера РС, такими, как управление режимом экрана, расширенные коды клавиатуры, цвета, окна и звуковые сигналы.

4. Модуль GRAPH.

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

5. Модуль OVERLAY.

Модуль OVERLAY позволяет уменьшить требования к памяти программы DOS реального режима.

20.Алгоритмы нахождения минимального и максимального чисел.

. нахождение максимального числа из n введенных чисел.

...........

for i:=1 to n do begin

readln(a);

if a>=max then max:=a;

end;

Давайте рассмотрим простой пример:

1.  Function Min(a, b: Integer): Integer;

2.  begin

3.  if a<b then Min:=a

4.  else Min:=b;

5.  end;

Мы привели пример, где функция находит минимальное число, из двух введённых чисел. Если параметры функции одинаковые, то они указываются через запятую, если разные, то через точку с запятой.

21.Алгоритмы сортировки.

Сортировка массива – это упорядочение его элементов по возрастанию или по убыванию. Общеприняты два метода: метод выбора и метод обмена (пузырька).

Метод выбора.

Ищем минимальный элемент в массиве и меняем его местами с первым элементом.

Рассматриваем массив со второго элемента … и т.д.

{Программа сортировки массива из 10-ти чисел методом выбора}

program massort;

uses crt;

var

i,j,n,min,buf:integer;

a:array[1..10] of integer;

begin

clrscr;

writeln('Введите 10 чисел через пробел, затем "Inter"');

for i:=1 to 10 do read (a[i]);

for i:=1 to 10 do

begin

min:=i;

for j:=i+1 to 10 do

if a[j]<a[min] then

min:=j;

buf:=a[i];

a[i]:=a[min];

a[min]:=buf;

end;

writeln(' Упорядоченный массив ');

for i:= 1 to 10 do write(a[i]:4);

repeat {цикл для остановки программы }

until keypressed; {и показа результата}

end.

Наберите программу и запустите ее на выполнение. Убедитесь в работе программы.

Метод обмена (пузырька). Сравнивается пара соседних элементов, если они расположены не по возрастанию, то меняются местами и так до конца массива. После одного прохода самый большой элемент оказывается последним. Процесс повторяется, пока есть пары, расположенные не по возрастанию.