пользователей: 21252
предметов: 10461
вопросов: 177855
Конспект-online
зарегистрируйся или войди через vk.com чтобы оставить конспект.
РЕГИСТРАЦИЯ ЭКСКУРСИЯ


Множество

Над множествами Паскаля определены общепринятые в математике операции: пересечение (*), объединение (+)  и вычитание (-). В скобках указан знак операции. Кроме этого, определены следующие операции отношения:

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.


16.01.2014; 01:22
хиты: 64
рейтинг:0
Точные науки
информатика
Алгоритмы
для добавления комментариев необходимо авторизироваться.
  Copyright © 2013-2016. All Rights Reserved. помощь