begin
var a:=ReadArrInteger('A(15 чисел)->',15);
var b:=ReadArrInteger('A(10 чисел)->',10);
b.Except(a).Println
end.
программа, которая выводит числа массива Б, не входящие в массив А
