Над множествами Паскаля определены общепринятые в математике операции: пересечение (*), объединение (+) и вычитание (-). В скобках указан знак операции. Кроме этого, определены следующие операции отношения:
1)равенство множеств (=);
2)неравенство множеств ();
3)левый операнд подмножество правого операнда (<=);
4)правый операнд подмножество левого операнда (>=);
5)принадлежность элемента множеству
Приоритеты операций в порядке убывания:
1) пересечение;
2) объединение и вычитание;
3) операции отношения.
Пример. Программа для решения следующей задачи. С клавиатуры вводятся символы. Признак конца ввода - точка. Вывести те символы, которые встречались во входной последовательности по одному разу.
Program single_char;
var c : char;
s, sd : set of char;
begin
s:=[ ]; [Инициализация множества входных символов]
sd:=[ ]; [Инициализация множества повторяющихся символов]
repeat
read(c);
if c in s
then sd:=sd+[c] [Накопление множества повторяющихся символов]
else s:=s+[c]; [Накопление множества всех символов]
until c='.';
s:=s-sd-[‘.’]; [Получение множества неповторяющихся символов]
writeln(‘ Неповторяющиеся символы входной последовательности:’)
for c:=#33 to #255 do
if (c in s) then write(c:3)
end.
