Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
SlavikPak
0 / 0 / 0
Регистрация: 19.10.2011
Сообщений: 9
1

Дана строка. Заменить в ней вхождения подстроки S1 на подстроку S2.

13.03.2012, 23:31. Просмотров 1003. Ответов 1
Метки нет (Все метки)

Дана строка, слова в которой разделены хотя бы одним пробелом. Заменить в ней вхождения подстроки S1 на подстроку S2. Например: Ленинград на Санкт-Петербург.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.03.2012, 23:31
Ответы с готовыми решениями:

Заменить все вхождения подстроки W в строке St на подстроку V
заменить все вхождения подстроки W в строке St на подстроку V

Заменить все вхождения подстроки Str1 на подстроку Str2 (подстроки вводятся с клавиатуры)
Заменить все вхождения подстроки Str l на подстроку Str2 (подстроки вводятся с клавиатуры)....

Дано предложение. Заменить в нем все вхождения подстроки Str1 на подстроку Str2
2. Дано предложение. Заменить в нем все вхождения подстроки Str1 на подстроку Str2.

Дана строка символов. Заменить все вхождения символа '{' на 'begin' , а каждое вхождение символа '}' - на 'end'
дана строка символов. Заменить все вхождения символа '{' на 'begin' , а каждое вхождение символа...

Дана строка символов. Заменить все вхождения символа ‘{’ на ‘begin’, а каждое вхождение символа ‘}’ – на ‘end’
3. Дана строка символов. Заменить все вхождения символа ‘{’ на ‘begin’, а каждое вхождение символа...

1
КонецСвета
Почетный модератор
7936 / 3907 / 2464
Регистрация: 30.10.2011
Сообщений: 5,379
13.03.2012, 23:48 2
Лучший ответ Сообщение было отмечено SlavikPak как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses crt;
var s1,s2,s: string;
    i: integer;
begin
write('s=');
readln(s);
write('s1=');
readln(s1);
write('s2=');
readln(s2);
repeat
i:=pos(s1,s);
delete(s,i,length(s1));
insert(s2,s,i);
until pos(s1,s)=0;
write('s=',s);
readln;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.03.2012, 23:48

Найти последнее вхождение подстроки «inf» и вставить перед ней номер ее вхождения
6)Дана строка. Найти последнее вхождение подстроки «inf» и вставить перед ней номер ее вхождения .

Вывести исходную строку а$, заменив в ней все вхождения заданной подстроки x$ на заданную подстроку y$
Вывести исходную строку а$, заменив в ней все вхождения заданной подстроки x$ на заданную подстроку...

Заменить все вхождения подстроки substr1 на подстроку substr2
Разработать программу, которая для заданной строки s: заменяет все вхождения подстроки substr1 на...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru