Народ помогите с задачкой!! ! Паскаль

Question

Вот условие: Дана непустая последовательность символов. Требуется построить и напечатать множество, элементами которого являются встречающиеся в последовательности цифры от “0” до “9”; 
Вопрос: Как вывести множество на экран? 
 
Я пробовал решать посмотрите и истравьте: 
uses crt; 
const n=9; 
var a:set of byte; 
 i,b:integer; 
begin 
a:=[]; 
for i:=0 to n do 
begin 
 write (Введите числа '); 
 readln (b); 
end; 
for i:=0 to 9 do 
begin 
 if chr(i) in then write ( ); 
end; 
writeln (Множество сформировано'); 
end.

Никита Лутаев · Accepted Answer

последовательно проверять есть ли такой элемент в множестве и если есть, то выводить. 
for i:=1 to 255 do 
....