Darbības ar kopām

Darbība Matemātikā PASCALā Ar Eilera riņķiem
Apvienojums A+B
Šķēlums A*B
Starpība A\B A-B

Kopu salīdzināšana

A = B
A <> B
A <= B (A ir B apakškopa)
A >= B (B ir A apakškopa)
A < B
A > B

IF A<=B THEN WRITELN('Kopa A ir kopas B apakškopa') ELSE WRITELN('Kopa A satur tādu elementu, kuru mesatur kopa B');

Elementa piederība kopai

IF 3 IN A THEN WRITELN('Cipars 3 pieder kopai A') ELSE WRITELN('Cipars 3 nepieder kopai A');
  

Kopas definēšana

  TYPE  burti=SET OF 'A'..'Z';
  VAR   a:SET OF 0..9;
        b:SET OF CHER;
        c:burti;
  const d=[1..6,9];
  begin
    a:=[1,3,4];