Дано предложение (вводится с клавиатуры) , в котором некоторые символы являются цифрами. найдите сумму этих цифр. подсказка: порядковые номера символов 0-9 в таблице acsii лежат в интервале 48-57

nastriopha1 nastriopha1    1   11.09.2019 07:10    1

Ответы
tana2811 tana2811  07.10.2020 06:59
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Введите строку: ');
  Writeln(s.MatchValues('\d').Select(c->c.ToInteger).Sum)
end.

Пример
Введите строку:  erer-5.456*3453gsd(4fgfh.==ertfer)re34se
46
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика