Презентация на тему Множество в языке Pascal

элементы множества должны принадлежать одному из скалярных (простых) типов,

кроме вещественных. Этот тип называется базовым типом множества. Базовый тип задается перечислением или диапазоном значений.
Если множество не имеет элементов, оно называется пустым и обозначается как [ ] .

255).
В множестве не может быть повторяющихся элементов.
Область

значений типа множество – набор всевозможных подмножеств, составленных из элементов базового типа.

of тип элементов;
 
2. Type имя типа = set of

тип элементов;
Var имя множества : имя типа;
 
где,
set of - служебные слова ( множество из);
тип элементов – любой порядковый.

a,b: mn;
c: set of

2..6;
Begin
a:=[ ‘A’..’Z’];
c:=[2, 4..6];
b:=[];
. . .
End.

проверки принадлежности какого-либо значения указанному множеству.

Обычно применяется в

операторах условного перехода . Результат выполнения операции логического типа ( True или False).

of char;
Begin
m1:=[‘0’..’9’];
m2:=[‘A’..’я’];
readln(s);
If s in m1 then writeln (‘цифра’)
else

if s in m2 then writeln (‘буква’);
. . .
end.

Пример:

двух множеств является третье множество, содержащее элементы обоих множеств.
A:=[3,5,7..10,

15..20]
B:=[1..4, 6, 10..12]
C:=A+B

{ C:=[1..12, 15..20] }



 
 

 

множеств является третье множество, которое содержит элементы, входящие одновременно

в оба множества.

A:=[3,5,7..10, 15..20]
B:=[1..4, 6, 10..12]
C:=A*B { C:=[3,10] }

множеств является третье множество, которое содержит элементы первого множества,

не входящие во второе множество.

A:=[3,5,7..10, 15..20]
B:=[1..4, 6, 10..12]
C:=A-B { C:=[5,7..9,15..20] }

А и В считаются равными, если они состоят из

одних и тех же элементов. Порядок следования элементов в сравниваемых множествах значения не имеет.
A:=[1,2,3]
B:=[3,2,1]
A=B {true}

множества А и В считаются не равными, если они

отличаются по мощности или по значению хотя бы одного элемента.
7. Операция «больше или равно» (>=) . Результат операции А>=B равен True , если все элементы множества В содержатся в множестве А.
8. Операция «меньше или равно» ( <=). Если все элементы множества А содержатся в множестве В , то результат равен True.

Пример:
Var zn: set of char;
Begin
zn:=[‘;’, ‘.’, ‘?’, ‘

‘, ‘!’, ‘:’, ‘-’]; {знаки препинания}
. . .
End.

a:mn;
x: char;
begin
a:=[‘f’, ‘j’, ‘e’];
For x:=’a’ to ‘z’

do
If x in a then write (x);
End.

выход

букв , слова разделены любым знаком препинания . Вывести

слова начинающиеся с гласной буквы , а оканчивающиеся - согласной.

do
If not(st[i] in zn) then
sl:=sl+st[i] else
begin
if (sl[1] in

glas) and
(sl[length(sl)] in sog) then Writeln(sl);
sl:='';
end;
end.