Даны три множества выдать на экран разность элементов пересечения множеств а и в с с. в паскале

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
  var a:=[3,5,1,9,4,6];
  var b:=[2,9,7,4,5];
  var c:=[7,4,8,1];
  var d:=a*b;
  Writeln(a,'^',b,'=',d);
  Writeln(d,'\',c,'=',d-c)
end.

Результат выполнения программы:
{9,6,5,4,3,1}^{9,5,4,2,7}={5,4,9}
{5,4,9}\{4,8,1,7}={5,9}