• Напишите программу дублирующию все символы 'И' в строке

Ответы 1

  • var s1,s2:string;i:integer;beginwriteln('Введите строку:');readln(s1);s2:='';for i:=1 to length(s1) do if s1[i]='И' then s2:=s2+'ИИ' else s2:=s2+s1[i];writeln(s2);end.Пример:Введите строку:НАПИШИТЕ ПРОГРАММУ ДУБЛИРУЮЩУЮ СИМВОЛЫНАПИИШИИТЕ ПРОГРАММУ ДУБЛИИРУЮЩУЮ СИИМВОЛЫ
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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