Множества чисел заполнены следующим образом: 1 - числа от -50 до 50, 2 - числа от 10 до 100. Выведите разность данных множеств(из первого вычитается второе).

А можно еще короче)))))

begin Range(-50,50).Except(Range(10,100)).Printlnend.

//Pascal ABC.NET 3.1 сборка 1256begin var sec1:=range(-50,50); var sec2:=range(10,100); sec1.except(sec2).Println;end.