Вывод множеств, Как вывести на экран множества Опции

[pank]

Добрый день, извините за, возможно, глупый вопрос - как вывести на экран множество, оператор write не работает. У меня множество чисел от 1 до N, я формирую из него подмножество элементов( m1), не превышающих 10, как их вывести на экран? Печатать команду:

for i:=1 to N do
if (i in m1) then write(i)

или есть другой способ?

[volvo]

А ко множествам ВООБЩЕ неприменимы такие понятия, как "сортировка" или "порядок следования элементов"... Множество просто хранит некоторое значение из некоторого определенного набора. Поэтому, чтобы вывести на печать множество букв латинского алфавита, отсортированное, например, по возрастанию, достаточно проверять на вхождение отсортированные элементы:

for ch := 'a' to 'z' do begin
  if ch in myset then write(ch);
end;

так как в цикле перебираются значения от 'a' до 'z' в порядке возрастания, то и вывод будет отсортирован по возрастанию...