информатика. програмирование. паскаль.с клавиатуры вводится строка, состоящаятиз слов и

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

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

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

function SumStr(s:string):=
    s.MatchValues('(^\s)\d+(\s)').Select(c-gt;c.ToInteger).Sum;

begin
  SumStr(ReadlnString('Введите строчку:')).Println
end.

Пример
Введите строчку: Cегодня 15 мая 2015 года, 4 часа 10 минут.
2044
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт