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

// 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}
Оцени ответ