Паскаль .вычеркиватели.Вычеркните из слова Х буквы, стоящие на чётных местах.
Паскаль .вычеркиватели.
Вычеркните из слова Х буквы, стоящие на чётных местах.
Ответ(ы) на вопрос:
var
s:String;
i:Integer;
Begin
Read(s);
for i:=1 to length(s) do
begin
if (i mod 2=0) then Delete(s,i,1);
end;
Writeln(s);
end.
Не нашли ответ?
Похожие вопросы