Question

Даны 2 слова в 2-х разных переменных одинаковой длины. Образовать новую последовательность в которой должны чередоваться буквы первого , второго слова , в обратном порядке, (не использовать pos ) паскаль))

Answer 1

Var s1,s2:string;
i:integer;
begin
readln(s1);
readln(s2);
for i:=length(s1) downto 1 do
write(s1[i],s2[i]);
end.