Schnittmenge berechnen

[Nicodius]

also nur mal so logisch (ich hab das vor 2 jahren gelernt) ...

Delphi-Quellcode:

 
var a, b, c:Menge; // c hinzufügen
begin
  a := [1,2,3];
  b := [3,4,5];
  c := a*b; // ergebnis wäre da natürlich 3 ;) 
end;