Вывести на экран все русские согласные буквы строки в алфавитном порядке. В паскале

// PascalABC.NET 3.2, сборка 1363 от 17.12.2016 // Внимание! Если программа не работает, обновите версию! begin   var sogl:='бвгджзйклмнпрстфхцчшщ';   var s:=readlnString('>').ToLower;   s.Where(c->Pos(c,sogl)>0).Distinct.Sorted.Println; end. Пример > А роЗА УПалА На АПУ аЗора злнпр