var s : set of integer := (1,2,3); begin end.