Реферат: Множини 3
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
Sets: = Sets + [S];
Read (S)