Множества, алфавитный порядок Опции

[Athen]

type letters=set of 'a'..'z';
Составить программу, использующую процедуру print(A), печатающую в алфавитном порядке все элементы множества А, имеющего тип letters.

Пыталась делать, но ..... помогите пляз!!

[volvo]

Элементы множества печатаются только полным перебором всех возможных значений:

var
  myset: letters;
  ch: char;
...
myset := ['b', 'r', 'u', 'f'];
for ch := 'a' to 'z' do
  if ch in my_set then write(ch);
...

(если перебираешь все значения ch в алфавитном порядке, то содержимое множества тоже будет в алфавитном порядке напечатано)

[Athen]

Значит в myset надо записать все буквы латинского алфавита?
Пасиба огромное!!!!