Дана непустая строка символов Требуется построить и напечатать множество, элементами...

Question

Дана непустая строка символов Требуется построить и напечатать множество, элементами которого являются в строке: буквы от 'а' до 'ж' и цифры от '4' до '9'

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Введите строку:');
  var m:=s.Where(c->c in 'абвгдеёж456789').ToHashSet;
  Writeln(m)
end.

---