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

Ответы 1

  • vars: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.
    • Автор:

      caden
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years