Дано предложение s удалить в нем все буквенные символы

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString;
  s:=s.RegexReplace('[A-Za-zА-Яа-яЁё]','');
  Writeln(s)
end.

Пример
s1<s2, если для первого несовпадающего символа с номером i s1[i]<s2[i]
1<2,         1[]<2[]