Дана строка-предложение. Зашифровать ее, поместив вначале все символы, расположенные на четных позициях строки, а затем, в обратном порядке, все символы, расположенные на нечетных позициях.

Дана строка-предложение. Зашифровать ее, поместив вначале все символы, расположенные на четных позициях строки, а затем, в обратном порядке, все символы, расположенные на нечетных позициях.
Гость
Ответ(ы) на вопрос:
Гость
var a, b, c, i, n :integer;      s, p:string; begin    readln (s);    for i:=1 to length (s) do       if i mod 2 = 0 then p:=p+s[i];    for i:=length (s) downto 1 do       if i mod 2 <> 0 then p:=p+s[i];    writeln (p); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы