Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
sergei3ru
21 / 18 / 1
Регистрация: 07.04.2010
Сообщений: 783
#1

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

02.06.2010, 10:45. Просмотров 1131. Ответов 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
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Удалить из строки все символы, заключенные в скобках! (Pascal):

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

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

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

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

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

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

4
Puporev
Модератор
52389 / 40236 / 13575
Регистрация: 18.05.2008
Сообщений: 92,996
02.06.2010, 11:03 #2
Цитата Сообщение от sergei3ru Посмотреть сообщение
удалить символы в строке, котрые находятся в скобках
Сами скобки удалять, или нет?
1
sergei3ru
21 / 18 / 1
Регистрация: 07.04.2010
Сообщений: 783
02.06.2010, 11:04  [ТС] #3
Да нет, не надо, пусть будут, в задаче про это ничего не сказано!
0
Puporev
Модератор
52389 / 40236 / 13575
Регистрация: 18.05.2008
Сообщений: 92,996
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 / 1
Регистрация: 07.04.2010
Сообщений: 783
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
Привет! Вот еще темы с ответами:

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

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

Дан текст, в который входят любые символы. Удалить из него все символы не являющиеся буквами или цифрами - Pascal
Дан текст, в который входят любые символы. Удалить из него все символы не являющиеся буквами или цифрами Помогите пожалуйста)))

Удалить символы строки от I до N - Pascal
Удалить все символы от I до N Добавлено через 6 минут Памогите пажалуста


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

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

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