Сформировать множества А и В, базовый тип которых 0..50 , по заданному числу элементов для каждого множества. Вывести на экран все элементы множества А, не принадлежащие В.

Здравствуйте

Можете пожалуйста срочно помочь с информатикой ?

Буду благодарна х

// PascalABC.NET 3.4.2, сборка 1806 от 30.09.2018// Внимание! Если программа не работает, обновите версию!

begin

 var (na,nb):=ReadInteger2('Мощность множеств A и B:');

 var A,B:set of integer;

 repeat

   A+=[Random(0,50)]

 until A.Count=na;

 A.Println;

 repeat

   B+=[Random(0,50)]

 until B.Count=nb;

 B.Println;

 (A-B).Println

end.