________________________________________________________________________________

7.2.Тип множество

Вматематике под множеством понимается неупорядоченный набор различ- ных однотипных элементов, определены также операции над множествами.

Для работы с множествами в Паскале введен тип переменных set of: type <имя типа>=set of <базовый тип>;

var A,B,C: имя типа;

здесь <базовый тип> - любой порядковый тип кроме Word, Integer, Longint, т.е. (перечисляемый, интервальный, char, byte, boolean).

Множество-константа: [i1, i2, …, ik], где ik – элементы множества.

7.2.1.Операции над множествами

Над переменными типа «множество» допустимы операции присваивания сложения, вычитания, умножения. Эти операции дополняют две процедуры:

Include (S, i); - добавление в множество S элемента i базового типа; Exclude (S, i); - исключение из множества S элемента i базового типа.

Эти операции выполняются значительно быстрее, чем эквивалентные им s:=s+[i]; s:=s-[i];

Операции проверки условия Результат c=d будет true, если множества одинаковы;

Результат c< > d будет true, если множества не одинаковы; Результат c>=d будет true, если все элементы d принадлежат с; Результат c<=d будет true, если все элементы с принадлежат d; Результат i in c будет true, если элемент i принадлежит с.

7.2.2.Примеры работы с множествами

1.Ввод n элементов множества:

......

Var A:set of char; s:char; n:Word;

begin

A:=[ ]; // Очистка множества for i:=1 to n do begin

read(s);

A:=A+[s]; end;

end.

2. Распечатать содержимое множества:

......

Var B:set of 1..100; k:byte;

begin

for k:=1 to 100 do if k in B then Write(k);

......

end.

47

PDF created with pdfFactory Pro trial version www.pdffactory.com