Дана строка 'аб12сд134е5',в ней нужно узнать количество чисел и вывести их.

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

begin
  var s:=ReadlnString('Введите строку:');
  var m:=s.Matches('\d+');
  Write('Найдено чисел- ',m.Count,': '); m.Println(',')
end.

Пример
Введите строку: аб12сд134е5
Найдено чисел- 3: 12,134,5