Вложенность составных операторов

[александр_77777]

Сообщение от Arigato

Тогда все совсем просто.

не знаю какой день но не получается

[Arigato]

Двигаемся по файлу, если находим begin, то увеличиваем счетчик, если end - если счетчик больше максимума, максимуму присваиваем значение счетчика; уменьшаем значение счетчика.
Со средней глубиной не совсем ясно, что имеется в виду.

[александр_77777]

Сообщение от Arigato

Двигаемся по файлу, если находим begin, то увеличиваем счетчик, если end - если счетчик больше максимума, максимуму присваиваем значение счетчика; уменьшаем значение счетчика.
Со средней глубиной не совсем ясно, что имеется в виду.

имеется в виду из всех найденных количеств составных операторов , для каждого составного оператора подсчитывается количество строк внутри и определяется максимальное количество строк из всех, и выводится, а средняя глубина означает сумма всех строк внутри составных операторов/ количество сост. операторов, причём мне нужно определить не количество а глубину вложенности сост. операторов : 1-й begin и последний end не учитывать

[BDA]

Сообщение от александр_77777

имеется в виду...

Вы сами так решили, или Вам так объяснил преподаватель?

[александр_77777]

Сообщение от BDA

Вы сами так решили, или Вам так объяснил преподаватель?

преподаватель, сделать можно либо на паскале или на delphi

[BDA]

Сообщение от александр_77777

преподаватель

Очень интересно

Сообщение от александр_77777

сделать можно либо на паскале или на delphi

Не обращайте внимания на мою подпись (ох, чувствую, придется ее убрать).

Пример:

begin
  writeln;
  writeln;
  writeln;
  writeln;
  writeln;
end;

Имеет больший уровень вложенности, чем:

begin
  begin
    writeln;
  end;
end;

[александр_77777]

Сообщение от BDA

Очень интересно

Не обращайте внимания на мою подпись (ох, чувствую, придется ее убрать).

Пример:

begin
  writeln;
  writeln;
  writeln;
  writeln;
  writeln;
end;

Имеет больший уровень вложенности, чем:

begin
  begin
    writeln;
  end;
end;

да вы правы в этом и проблема как это реализовать

[BDA]

Сообщение от александр_77777

да вы правы в этом и проблема как это реализовать

Просто такая трактовка вводит меня в ступор, так как (код с отмеченными уровнями вложенности):

begin{1}
  writeln;
  writeln;
  writeln;
  writeln;
  writeln;
end;{1}

...

begin{1}
  begin{2}
    writeln;
  end;{2}
end;{1}

Так обычно понимается термин "уровень вложенности" (если это не так, поправьте меня).

[александр_77777]

Сообщение от BDA

Просто такая трактовка вводит меня в ступор, так как (код с отмеченными уровнями вложенности):

begin{1}
  writeln;
  writeln;
  writeln;
  writeln;
  writeln;
end;{1}

...

begin{1}
  begin{2}
    writeln;
  end;{2}
end;{1}

Так обычно понимается термин "уровень вложенности" (если это не так, поправьте меня).

да это так уровень вложенности или глубина

помогите если есть идеи пожалуйста

необходимо выполнить таким образом
begin{1}
writeln;
writeln;
writeln;
writeln;
writeln;
end;{1}

begin{2}
writeln;
writeln;
writeln;
writeln;
writeln;
end;{2}
в исходном файле у меня не будет сложных вложений типа
begin{1}
begin{2}
writeln;
end;{2}
end;{1}

[Arigato]

Я вам расписал идею решения задачи для нахождения максимальной глубины вложенности.
Что касается средней глубины:

begin {1}
  begin {2}
    begin {3}
    end; {/3}
  end; {/2}
end; {/1}
begin {1}
end; {/1}

Максимальная вложенность 3. А средняя как считается, (3+1)/2 или (1+2+3+1)/4?

Сообщение от BDA

Не обращайте внимания на мою подпись (ох, чувствую, придется ее убрать).

Мелкий шрифт спасает от таких проблем. Можно еще цвет темно-серый сделать.