Строки

@YayaEae · Регистрация: 29.09.2010

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

Нужна программа, чтобы делала следующее: Мы вводим произвольную строку, программа запрашивает какую букву надо заменить, после чего запрашивает на какую букву надо заменить, после чего выводить эту строку с проделанной этими операцией строку .
Очень буду благодарен ))

@andrei63 · 03.12.2010, 20:48

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var s:string;
i:integer;
s1,s2:char;
begin
writeln('введите строку');
readln(S);
writeln('введите буквы');
readln(s1);
writeln('введите на какую букву');
readln(s2);
for i:=1 to length(s) do
if s[i]=s1 then s[i]:=s2;
writeln(s);
end.

@YayaEae · 03.12.2010, 20:54 **[ТС]**

а зациклить это сможете?

@andrei63 · 03.12.2010, 21:01

всмысле?

@YayaEae · 03.12.2010, 21:03 **[ТС]**

чтобы он запрашивал еще раз ? при о-нет а при всех других цифрах он начинал все заново, зациклить ее надо))

@andrei63 · 03.12.2010, 21:14

так я понял?

Pascal
1
2
3
4
repeat
writeln('введите на какую букву');
readln(s2);
until s2='o';

@YayaEae · 03.12.2010, 21:19 **[ТС]**

нет, чтобы все это поторядось еще раз. Вот так понятнее будет наверно. Он запросил у меня все что надо , я ввел все что надо .а когда операция выполнена , то он закрвыывется, точнее показывает написание программы, а надо чтобы он не закрывался по себе, а запрашивал" еще раз" и если я ввожу в ответ 0 то он не повторял, если же другю цифрц отличную от нулю, то чтобы программа запускалась занова

@Dekio · 03.12.2010, 21:24

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var s:string;
i,pr:integer;
s1,s2:char;
begin
pr:=1;
repeat
writeln('введите строку');
readln(S);
writeln('введите буквы');
readln(s1);
writeln('введите на какую букву');
readln(s2);
for i:=1 to length(s) do
if s[i]=s1 then s[i]:=s2;
writeln(s);
writeln('Продолжить?');
readln(pr);
until p=0;
end.

@YayaEae · 03.12.2010, 21:26 **[ТС]**

Надо чтобы программа выполнила следующее: Например я ввожу "Привет ривет рива "
он меняет "рив" во всех местах допустим на "ляля" , после чего выводить " Пляляет ляляет ляляа"
очень нужна , пожалуйста , поможете с этим?

Добавлено через 1 минуту
а я между прочим на все тои ответы отвечаю +1 спасибо))) Спасибо вам большое))

@andrei63 · 03.12.2010, 21:32

Не по теме:

Запрещено создавать темы с множеством вопросов во всех разделах, кроме разделов платных услуг. Один вопрос - одна тема.

@Dekio · 03.12.2010, 21:34

это если именно под рив

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program norm;
var 
s :string;
t :string[15];
i :integer;
begin
writeln('Введите строку');
readln(s);
writeln('Введите подстроку');
readln(t);
while pos('рив',s) <> 0 do
begin
i:=pos('рив',s);
delete(s,i,length('рив'));
insert(t,s,i);
end;
writeln(s);
end.

@YayaEae · 03.12.2010, 21:35 **[ТС]**

Спасибо я понял))

@Dekio · 03.12.2010, 21:37

а это на любой случай

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program norm;
var 
s :string;
t,k :string[15];
i :integer;
begin
writeln('Введите строку');
readln(s);
writeln('Что заменять');
readln(t);
writeln('На что заменять');
readln(k);
while pos(t,s) <> 0 do
begin
i:=pos(t,s);
delete(s,i,length(t));
insert(k,s,i);
end;
writeln(s);
end.

Новые блоги и статьи Все статьи Все блоги /
Настройка записи справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .

@YayaEae 0 / 0 / 0 Регистрация: 29.09.2010 Сообщений: 22

	Строки 03.12.2010, 20:41. Показов 773. Ответов 12 Метки нет (Все метки) Нужна программа, чтобы делала следующее: Мы вводим произвольную строку, программа запрашивает какую букву надо заменить, после чего запрашивает на какую букву надо заменить, после чего выводить эту строку с проделанной этими операцией строку . Очень буду благодарен )) 0

@YayaEae 0 / 0 / 0 Регистрация: 29.09.2010 Сообщений: 22
	03.12.2010, 20:54 [ТС]
	а зациклить это сможете? 0

@andrei63 141 / 135 / 69 Регистрация: 15.12.2009 Сообщений: 343
	03.12.2010, 21:01
	всмысле? 1

@YayaEae 0 / 0 / 0 Регистрация: 29.09.2010 Сообщений: 22
	03.12.2010, 21:03 [ТС]
	чтобы он запрашивал еще раз ? при о-нет а при всех других цифрах он начинал все заново, зациклить ее надо)) 0

@YayaEae 0 / 0 / 0 Регистрация: 29.09.2010 Сообщений: 22
	03.12.2010, 21:19 [ТС]
	нет, чтобы все это поторядось еще раз. Вот так понятнее будет наверно. Он запросил у меня все что надо , я ввел все что надо .а когда операция выполнена , то он закрвыывется, точнее показывает написание программы, а надо чтобы он не закрывался по себе, а запрашивал" еще раз" и если я ввожу в ответ 0 то он не повторял, если же другю цифрц отличную от нулю, то чтобы программа запускалась занова 0

@YayaEae 0 / 0 / 0 Регистрация: 29.09.2010 Сообщений: 22
	03.12.2010, 21:26 [ТС]
	Надо чтобы программа выполнила следующее: Например я ввожу "Привет ривет рива " он меняет "рив" во всех местах допустим на "ляля" , после чего выводить " Пляляет ляляет ляляа" очень нужна , пожалуйста , поможете с этим? Добавлено через 1 минуту а я между прочим на все тои ответы отвечаю +1 спасибо))) Спасибо вам большое)) 0

@andrei63
	03.12.2010, 21:32
	Не по теме: Запрещено создавать темы с множеством вопросов во всех разделах, кроме разделов платных услуг. Один вопрос - одна тема. 0

@YayaEae 0 / 0 / 0 Регистрация: 29.09.2010 Сообщений: 22
	03.12.2010, 21:35 [ТС]
	Спасибо я понял)) 0