Замена данного символа на любое сочетание символов.(Тип данных string)

@Whocares · Регистрация: 27.01.2011

Author24 — интернет-сервис помощи студентам

Написать программу которая каждую встречную букву Б будет заменять сочетанием КУ.

Понимаю что это оч легкая задачка, только никак не допрет до меня =(, так что сильно не ругайте..

Заранее благодарен.

@SuPeR XaKer · 27.01.2011, 22:05

Pascal

Uses
 CRT;
Var
 s:string;
 i:integer;
begin
ClrScr;
write('Введите строку: ');
readln(s);
while pos('Б',s)<>0 do
begin
 i:=pos('Б',s);
 delete(s,i,1);
 insert('КУ',s,i);
end;
writeln(s);
readkey
end.

@N@tali · 27.01.2011, 22:08

))))))))) опоздала с решением так что выкладывать не буду ))))

@Whocares 0 / 0 / 0 Регистрация: 27.01.2011 Сообщений: 4
		1
	Замена данного символа на любое сочетание символов.(Тип данных string) 27.01.2011, 21:42. Показов 1888. Ответов 2 Метки нет (Все метки) Написать программу которая каждую встречную букву Б будет заменять сочетанием КУ. Понимаю что это оч легкая задачка, только никак не допрет до меня =(, так что сильно не ругайте.. Заранее благодарен. 0

@N@tali 781 / 462 / 85 Регистрация: 20.02.2010 Сообщений: 974
	27.01.2011, 22:08	3
	))))))))) опоздала с решением так что выкладывать не буду )))) 0

Опции темы

Замена данного символа на любое сочетание символов.(Тип данных string)

Решение