Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
sergei3ru
21 / 18 / 4
Регистрация: 07.04.2010
Сообщений: 781
1

Удалить из строки все символы, заключенные в скобках!

02.06.2010, 10:45. Просмотров 1255. Ответов 4
Метки нет (Все метки)

Добрый день, подскажите, пожалуйста, как можно удалить символы в строке, котрые находятся в скобках, но еще условие, что скобок может быть несколько в строке...
Листинг программы вот...
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
program z1;
var
s:string;
s1,i,a:integer;
begin
writeln('vvedite stroky');
readln(s);
s1:=length(s);
s:=Copy(s, 0, Pos('(' ,s) + 1) + Copy(s, Pos(')', s), Length(s));
writeln('Polychilas stroka-',s);
readln;
end.
Но удаляет символы только в одной скобке!
Как сделать, чтобы удалялись символы и в других скобках?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.06.2010, 10:45
Ответы с готовыми решениями:

Удалить из строки все символы, находящиеся между «А» и «В»
1.Дана строка символов. Удалить из нее все символы, находящиеся между «А» и...

удалить из строки все символы не являющиеся буквами
помогите пожалуйста!!!!!!!!!!! Введите строку сивмолов.удалить из строки все...

Удалить из строки все сдвоенные, строенные и т. д. символы
Удалить из строки все сдвоенные, строенные и т. д. символы

Строки. Удалить все символы в строке после «*»
помогите пожалуйста 1.Составьте программу, которая как только в строке...

Удалить из строки все скобки и символы внутри них
дано натуральное число n,символы s1..sn.Исключить из последовательности s1..sn...

4
Puporev
Модератор
54678 / 42099 / 29068
Регистрация: 18.05.2008
Сообщений: 99,341
02.06.2010, 11:03 2
Цитата Сообщение от sergei3ru Посмотреть сообщение
удалить символы в строке, котрые находятся в скобках
Сами скобки удалять, или нет?
1
sergei3ru
21 / 18 / 4
Регистрация: 07.04.2010
Сообщений: 781
02.06.2010, 11:04  [ТС] 3
Да нет, не надо, пусть будут, в задаче про это ничего не сказано!
0
Puporev
Модератор
54678 / 42099 / 29068
Регистрация: 18.05.2008
Сообщений: 99,341
02.06.2010, 11:08 4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program del;
uses crt;
var l,i,n,m:integer;
st:string;
begin
clrscr;
readln(st);
i:=length(st);
while i>=1do
if st[i]='(' then
 begin
  n:=i;
  while (st[n]<>')')and(n<=length(st)) do n:=n+1;
  delete(st,i+1,n-i-1);
  i:=i-1;
 end
else i:=i-1;
write(st);
readln
end.
1
sergei3ru
21 / 18 / 4
Регистрация: 07.04.2010
Сообщений: 781
02.06.2010, 11:35  [ТС] 5
Ух ты, классно!Сейчас проверим!Спасибо огоромное!

Добавлено через 15 минут
Спасибо огромное, выручили!Все прекрасно работает!А главное в коде программы все понятно, я во всем разобрался!Спасибо!
0
02.06.2010, 11:35
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.06.2010, 11:35

Удалить из строки все подряд идущие одинаковые символы
Удалить из строки все подряд идущие одинаковые символы(КУмир/Паскаль)

Удалить из строки все символы, которые не являются арабскими цифрами.
Заданая строка, котороя состоит из слов, розделенными одним или несколькими...

Строки. Удалить все символы в строке после "*"
Помогите решить. Составьте программу, которая как только в строке встретится...


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

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

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