Даны две строки s1: =d,e,f и s2: =567.получить строку - вопрос №825046012567567 от SofiShidlFox 18.01.2023 08:34

Question

Информатика: Даны две строки s1: =d,e,f и s2: =567.получить строку d5e6f7

SofiShidlFox · Answer

// 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