Помощь - Поиск - Пользователи - Календарь
Полная версия: Множества
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
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 надо записать все буквы латинского алфавита?
Пасиба огромное!!!!
Lapp
Цитата(Athen @ 26.04.2007 7:51) *

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

Зачем все? Ты же просила все элементы множества А!
Считай, что myset (а также my_set, это просто опечатка) - это и есть твое А.
Athen
ааа... все, поняла... туплю, извините! rolleyes.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.