нужно в Паскале ABC (множества)
Дан текст из строчных латинских букв, за которым следует точка. Напечатать: все буквы, входящие в текст по одному разу

// PascalABC.NET 3.0, сборка 1088begin  var s:=ReadString('Введите текст: ');  var MySet:=s.Where(x->x<>' ').Distinct;  Writeln(MySet)end.Тестовое решение:Введите текст: this is a test string for my own needs[t,h,i,s,a,e,r,n,g,f,o,m,y,w,d]