Question

How to remove an element from a set in Pascal

Answer 1

program RemoveElementFromSet;

type
  TMySet = set of 1..10;

var
  MySet: TMySet;
  i: Integer;

begin
  MySet := [1, 2, 3, 4, 5, 6];  // Initialize the set

  Exclude(MySet, 3);  // Remove the element 3 from the set
  
  for i := Low(TMySet) to High(TMySet) do
    if i in MySet then
      WriteLn('Set contains: ', i);
end.



(*
run:
  
Set contains: 1
Set contains: 2
Set contains: 4
Set contains: 5
Set contains: 6

*)

 

70+ SQL courses for beginners and professionals