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

// PascalABC.NET 3.2, сборка 1439 от 09.05.2017// Внимание! Если программа не работает, обновите версию!function SumDig(n:integer):integer;begin  Result:=0;  while n>0 do begin    Result+=n mod 10;    n:=n div 10    endend;begin  var s:=ReadlnString.ToIntegers.Select(n->SumDig(n)).JoinIntoString('');  s.Printlnend.Пример123 4355 12 221 9865620 32331 223234 122326173536121610