pascalabcnet/InstallerSamples/NETLibraries/System.String/StringSplit.pas

begin
  var s: string := '12 765 765 76';
  // Разбиение строки на массив подстрок с заданным разелителем
  var str_arr: array of string := s.Split;
  
  // Соединение массива подстрок с новым разделителем
  s := str_arr.JoinToString(' + ');
  Write(s, ' = ');
  
  // Формирование целочисленного массива по массиву подстрок
  var int_arr := new integer[str_arr.Length];
  for var i:=0 to int_arr.Length-1 do
    integer.TryParse(str_arr[i], int_arr[i]);
  
  // Вычисление суммы элементов целочисленного массива
  var sum := 0;
  foreach var v: integer in int_arr do
    sum += v;
  Writeln(sum);
end.