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

PascalABC.NET

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 14, средняя оценка - 4.93
Gizard
0 / 0 / 0
Регистрация: 08.06.2014
Сообщений: 8
#1

Дана строка символов, среди которых есть одна открывающая и одна закрывающая скобки - PascalABC.NET

08.06.2014, 13:52. Просмотров 2645. Ответов 7
Метки нет (Все метки)

Помогите плиз! Дана строка символов, среди которых есть одна открывающая и одна закрывающая скобки. Вывести на экран все символы, расположенные внутри скобок.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.06.2014, 13:52
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Дана строка символов, среди которых есть одна открывающая и одна закрывающая скобки (PascalABC.NET):

На вход программе подается набор символов (в одной строке), среди которых есть хотя бы одна цифра. - Pascal
На вход программе подается набор символов (в одной строке), среди которых есть хотя бы одна цифра. Окончание ввода ― цифра. Длина строки не...

Дана строка символов, среди которых есть <<->>. Определить, сколько символов от него до конца строки. - Pascal
Дана строка символов, среди которых есть &lt;&lt;-&gt;&gt;. Определить, символов от него до конца строки. Кто сможет это решить? пожалуйста...

Дано натуральное число n и символы s1, s2, ... sn, среди которых есть хотя бы одна точка - Pascal
Дано натуральное число n и символы s1, s2, ... sn, среди которых есть хотя бы одна точка. Преобразовать последовательность s1, s2, ... sn,...

Выяснить, имеется ли у него одна самая короткая строка или таких строк несколько. Вывести одна или не одна. - Pascal
дaн текстовый файл с произвольным именем. Выяснить, имеется ли у него одна самая короткая строка или таких строк несколько. Вывести одна...

Заданы три числа Определить есть ли среди них хотя бы одна пара равных по величине - Pascal
помогите решить задачу. Заданы три числа Определить есть ли среди них хотя бы одна пара равных по величине

Заданы три числа. Определить, есть ли среди них хотя бы одна пара одинаковых чисел - Pascal
Решите, пожалуйста, такую задачу: Заданы три числа. Определить, есть ли среди них хотя бы одна пара одинаковых чисел. p.s. с...

7
APALoff
1636 / 1065 / 470
Регистрация: 03.07.2013
Сообщений: 4,506
09.06.2014, 11:54 #2
Pascal
1
For i:=Pos('(',St)+1 to Length(St) do If St[i]<>')' then Write(St[i]) else Break;
0
Sergio Leone
2458 / 1103 / 402
Регистрация: 07.06.2014
Сообщений: 3,259
09.06.2014, 12:14 #3
без цикла не проще?
Pascal
1
  WriteLn( copy(s, Pos('(',s)+1, Pos(')',s)-Pos('(',s)-1 ));
0
APALoff
1636 / 1065 / 470
Регистрация: 03.07.2013
Сообщений: 4,506
09.06.2014, 12:38 #4
не слишком проще...
например как отработает строка?: abc)def(ghi)jkl
0
Sergio Leone
2458 / 1103 / 402
Регистрация: 07.06.2014
Сообщений: 3,259
09.06.2014, 13:16 #5
Цитата Сообщение от APALoff Посмотреть сообщение
Например как отработает строка?: abc)def(ghi)jkl
а Вы задание ВНИМАТЕЛЬНО перечитайте... сколько в строке открывающих и сколько закрывающих скобок.
и вопрос, как отработает - отпадёт
кстати, ошибок не будет - будет пустая строка, т.к. нарушены условия задачи...

p.s. строго говоря, в задании ничего не сказано, как скобки расположены.
поэтому я не уверен, что для строки aaa)bbbb(ddd
ваш код нормально отработает!
0
APALoff
1636 / 1065 / 470
Регистрация: 03.07.2013
Сообщений: 4,506
09.06.2014, 14:38 #6
Да действительно, про количество не заметил.

Цитата Сообщение от Sergio Leone Посмотреть сообщение
что для строки aaa)bbbb(ddd
ваш код нормально отработает!
так же как и ваш - пустой строкой.
0
Gizard
0 / 0 / 0
Регистрация: 08.06.2014
Сообщений: 8
09.06.2014, 19:57  [ТС] #7
я вот ещё сам попробовал написать вот что получилось:
Pascal
1
2
3
4
5
6
7
8
9
10
uses crt;
var s: string;
    i: byte;
begin
writeln('Введите фразу:');
readln(s);
for i:=pos('(',s)+1 to pos(')',s)-1 do
    write(s[i]);
readln;
end.
0
APALoff
1636 / 1065 / 470
Регистрация: 03.07.2013
Сообщений: 4,506
09.06.2014, 20:31 #8
Тогда уж лучше как у Sergio Leone - цикл действительно не нужен.
0
09.06.2014, 20:31
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.06.2014, 20:31
Привет! Вот еще темы с ответами:

Дана строка символов. Проверить, есть ли в строке полный набор всех цифровых символов - Pascal
Дана строка символов. Проверить, есть ли в строке полный набор всех цифровых символов

Дана строка символов; подсчитать, сколько раз среди символов строки встречается буква "х" - Pascal
Здрасьте товарищи! спасите от еменуемой пересдачи пожалуйста!я глупая и бестолковая. Составьте прогу на Паскале пожалуйста. Она вроде не...

Определить, является ли одна строка подстрокой другой - PascalABC.NET
var t:boolean; i,j:integer; s1,s2:string; begin t:=true; writeln(); readln(s1); writeln(); readln(s2);

Из файла считывается только одна строка (в процедуре max происходит выход за границы массива) - Pascal
Хелп, дорогие форумчане! Проблема: прога по-хорошему считывает из файла только одну строку Проще говоря, если в файле одна строка -...


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

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

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