Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.91/11: Рейтинг темы: голосов - 11, средняя оценка - 4.91
1 / 1 / 2
Регистрация: 29.02.2012
Сообщений: 48
1

Стек:В файле записан текст, сбалансированный по круглым скобкам

24.09.2012, 22:13. Показов 2206. Ответов 3
Метки нет (Все метки)

В файле записан текст, сбалансированный по круглым скобкам.Требуется для каждой пары соответствующих открывающей и закрывающей скобок напечатать номера их позиций в тексте, упорядочив пары номеров по возрастанию номеров позиций закрывающих скобок. Например, для текста a+(45-f(x)*(b-c)) надо напечатать 8 10, 12 16, 3 17.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.09.2012, 22:13
Ответы с готовыми решениями:

В текстовом файле t записан текст, сбалансированный по круглым скобкам
Используя очередь, написать следующую задачу. В текстовом файле t записан текст, сбалансированный...

Ребят нужен совет, есть текстовый файл с сбалансированный по круглым скобкам. Выполнить со стеком
#include <conio.h> #include <stdio.h> #define NMAX 100 #include <windows.h> struct stek { ...

Как запустить программу, текст которой записан в файле
доброй ночи, программисты. помогите,пожалуйста, запустить программу. у меня есть написанный код...

В файл f записан текст. Подсчитать число слов в этом файле
Помогите написать код. В файл f записан текст. Подсчитать число слов в этом файле.

3
0 / 0 / 0
Регистрация: 12.12.2012
Сообщений: 15
14.12.2012, 12:53 2
так ни кто и не помог?
0
Эксперт по математике/физике
4156 / 2059 / 424
Регистрация: 19.07.2009
Сообщений: 3,117
Записей в блоге: 24
14.12.2012, 13:47 3
Количество открывающихся и закрывающихся скобок одинаковое.
1. Перебираем все закрывающиеся скобки (при этом пусть k задаёт позицию закрывающейся скобки, а i — её номер).
Pascal
1
2
3
4
5
6
7
8
9
i:=0;
for k:=1 to length(str) do
  begin
    if str[k]=')'
      then begin
        inc(i);
        { ... }
      end;
  end;
2. Сопоставляем этой скобке ей соответствующую открытую, отматывая назад по строке:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
i:=0;
for k:=1 to length(str) do
  begin
    if str[k]=')'
      then begin
        inc(i);
        d:=1; // число неспаренных скобок
        l:=k-1;
        while d>0 and l>0 do // l>0 — на всякий случай
          begin
            if str[l]='(' then dec(d);
            if str[l]=')' then inc(d);
            dec(l);
          end;
        writeln(l+1,' ',k);
      end;
  end;
Кликните здесь для просмотра всего текста
http://ideone.com/o6x0go
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var str:string; i,k,l,d: integer;
BEGIN
str:='a+(45-f(x)*(b-c))';
i:=0;
for k:=1 to length(str) do
* begin
* * if str[k]=')'
* * * then begin
* * * * inc(i);
* * * * d:=1; // число неспаренных скобок
* * * * l:=k-1;
* * * * while (d>0) and (l>0) do
* * * * * begin
* * * * * * if str[l]='(' then dec(d);
* * * * * * if str[l]=')' then inc(d);
* * * * * * dec(l);
* * * * * end;
* * * * writeln(l,' ',k);
* * * end;
* end;
END.
2
1 / 1 / 2
Регистрация: 29.02.2012
Сообщений: 48
18.12.2012, 23:19  [ТС] 4
мне нужно чтобы это из файла смотрела и использовался стек, динамические переменные
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.12.2012, 23:19

В текстовом файле input.txt записан русский текст. Найти в тексте слова
В текстовом файле input.txt записан русский текст. Найти в тексте слова, содержащие две одинаковые...

В файле находится текст программы на Паскале. Используя стек, проверить правильность вложений операторных скобок (begin - end) в этой программе
В файле находится текст программы на Паскале. Используя стек, проверить правильность вложений...

В текстовом файле записан массив целых чисел...
Помогите пожалуйста написать программу ко вторнику. В текстовом файле записан массив целых чисел...

В файле записан массив, который содержит сведения о машинах
Сижу уже 3 день не могу проге ума дать, помогите(хотя бы пример подкинте похожий) задача: В файле...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru