Паскаль .вычеркиватели. вычеркните из слова х буквы, стоящие на чётных местах.

Юля5900274 Юля5900274    2   14.06.2019 21:10    3

Ответы
Someoneone Someoneone  12.07.2020 09:57
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика