Zitat von
Hawkeye219:
Das Ergebnis einer Mengenverknüpfung kann natürlich niemals vom Typ char sein.
Stimmt, das war mir gar nicht aufgefallen. Ich habe allerdings diese Fehlermeldung bekommen, als ich versucht habe, 2 Mengen miteinander zu multiplizieren. Also muss man wohl den "umständlichen" Weg gehen. Hier noch einmal etwas anders formuliert.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var Menge1,Menge2,Ergebnis: set of byte;
begin
Menge1 := [1,2,3,4,5,9,11];
Menge2 := [0,4,5,6,9];
//Schnittmenge = Vereinigungsmenge - Differenzmenge
//Differenzmenge = Elemente aus Menge1, die nicht in Menge2 und umgekehrt
Ergebnis := (Menge1 + Menge2) - ((Menge1 - Menge2) + (Menge2 - Menge1));
end;