применение строк при решении задач, help! Опции

[Happy User!!!]

Помогите:
Дана строка символов, среди которых есть одна раскрывающаяся и одна закрывающаяся скобка. Вывести на экран все символы, расположенные внутри скобок.

Сообщение отредактировано: Happy User!!! - 2.12.2006 4:03

[мисс_граффити]

идешь циклом от позиции открывающейся скобки до позиции закрывающейся.

[Happy User!!!]

Напиши пожалуйста код,очень нужно......а то не получается сделать!!!

[мисс_граффити]

а ты пробовал?
что-то я не представляю, что здесь может не получиться.
Для определения положения скобок используют ф-цию pos.
цикл - видимо, со счетчиком, раз известно начальное и конечное значение.

в общем, если пробовал - показывай, как именно.

[volvo]

  writeln( copy(s, succ(pos('(', s)), pred(pos(')', s) - pos('(', s))) );

[Happy User!!!]

Я щас на работе...мне очень нужно решить эту программу....ПОЖАЛУЙСТА....желательно полный код

[volvo]

А чего не хватает в том, что я привел? Строку ввести не можешь? Я ж не знаю, что тебе нужно... Ты просил

Вывести на экран все символы, расположенные внутри скобок

- я показал, как это делается... Строка у тебя ДАНА, ты же не показываешь, КАК ИМЕННО она дана... С чего я тебе должен показывать код полностью?

[Happy User!!!]

строка данна случайна..т.е. ты ее сам набираешь.
Вот к примеры к этой строке 1 2 ( 3 4 ) 5

[Bokul]

Happy User!!!, советую почитать Faq

var s:string;
begin
readln(s);
writeln( copy(s, succ(pos('(', s)), pred(pos(')', s) - pos('(', s))) );
readln;
end.

[Happy User!!!]

спасибо....