Удвоить вхождение некоторой буквы в текст. например, при удваивании буквы ‘а’ текст ‘ трава ’ должен превратиться в текст ‘траваа’.
Rimma1223
2
16.03.2019 21:20
0
Другие вопросы по теме Информатика
Анна5363646
03.06.2019 03:40
АлександрСмуглиенко
03.06.2019 03:40
Kpuc2100
15.04.2019 12:29
smail130
15.04.2019 12:31
joraninga
15.04.2019 12:31
myhaylonotochk
23.11.2020 20:19
ГюнтерСтингерсон
23.11.2020 20:19
шкальник2281337
11.05.2021 20:14
irca1987
11.05.2021 20:15
Популярные вопросы
- Listen to tiny s poem. learn the poem. in winter it s cold and snowy. in summer...
2 - Сделать кроссворд. позагадывать вопросы к ответам, , нажо, . такое значит: составить...
1 - Переводи.клоуны весёлые и прикольные смешные.они большие и маленькие толстые...
2 - Начерти два прямоугольника один со соронами 2 см и 3 см а другой со сторонами...
2 - Доказать основные свойства треугольника...
2 - Кто может. я в общих понимаю, но что-то сильно сомневаюсь 3. установите верную...
1 - Вы начальник цеха (отдела). после реорганизации вам необходимо перекомплектовать...
1 - Выполнить синтаксический разбор: справа у подножия горы расстилается долина,...
3 - Люди, добрые! выручайте! ! определить в каком времени находится это предложение...
2 - (a+3b)(a+b++b)(a+3b+2) ,желательно как можно более подробнее,в не бум-бум,заранее...
3
var
text,sym:string;
i:integer;
begin
readln(text);
readln(sym);
for i:=1 to length(text) do
if text[i] = sym then text[i]:=text[i]+sym;
writeln(text);
end.