Даны две строки S1:=d,e,f и S2:=567.Получить строку d5e6f7

Question

Даны две строки S1:=d,e,f и S2:=567.Получить строку d5e6f7

Answer 1

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s1:=ReadlnString('S1=').Replace(',','');
  var s2:=ReadlnString('S2=');
  var s:=S1.Interleave(S2).JoinIntoString('');
  Writeln(s)
end.

Пример
S1= d,e,f
S2= 567
d5e6f7