информатика. програмирование. паскаль.

с клавиатуры вводится строка, состоящаятиз слов и чисел, разделенных одним пробелом. написать функцию, подсчитыапющую сумму чисел во введённой строке.

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!function SumStr(s:string):=    s.MatchValues('(^|\s)\d+(\s|$)').Select(c->c.ToInteger).Sum;begin  SumStr(ReadlnString('Введите строку:')).Printlnend.ПримерВведите строку: Cегодня 15 мая 2015 года, 4 часа 10 минут.2044