Множини, Детальна інформація

8 in [0..3, 6, 9] – результат false.

7) В Р. програмі множина задається в вигляді списку елементів, заключеного в [ ]. В [ ] може бути 1 або більше елементів, а може не бути жодного (порожня множина). В якості елементу може використовуватись const, змінна, вираз, значення якого належить базовому типу, а також парі елементів, розділених двома крапками (інтервал значень).

8) В Р. можна використовувати інструкції присвоєння слідуючих виразів:

ColSet : = [WHITE, RED];

ColSet : = [ ];

TSet : = [1, 7, 5];

TSet : = [1..5, 8];

TSet : = [8 mod 4, 15 div 5].

9) При роботі з множинами можна використовувати операція порівняння:

=, < >, > =, < =

Операції “=” і “< >” дозволяють перевірити, рівні дві множини, чи ні. З допомогою oперацій “> =” і “< =” можна визначити, чи є одна множина підмножинною іншої.

Приклад:

[RED, WHITE] = [ RED, GREEN] – резкльтат false

[RED] < = [RED, WHITE] – результат true.

Операції в порядку зменшення пріоритету розміщуються так:

*

+

in, =, < >, > =, < = (рівнопріоритетні операції)

Приклад №1 Із файла Input вводиться текст, який містить символи від знаку “+” до лівої квадратної дужки “ [ “. Роздрукувати символи тексту в порядку коду ASCII (з символів, що зустрічаються повторно, виводити тільки один).

Program Sort (Input, Output);

Var

S: char;

Sets: set of ‘+’ [‘;

I: ‘+’..’[‘;

begin

Sets: = [ ];

Read (S)

While not Eof do begin

While not Eoln do

begin