68988

Операції над динамічними рядками

Лекция

Информатика, кибернетика и программирование

Розглянемо процедуру шукання заданого елемента. Попередньо опишемо тип, який відображає рядок символів як динамічну структуру. Складемо логічну функцію виявлення заданого символу в заданому динамічному рядку. Передбачимо як побічний ефект логічної функції шукання елемента вказівку...

Украинкский

2014-09-28

38 KB

1 чел.

Лекція № 17

Тема: Операції над динамічними рядками

План заняття:

  1.  Пошук заданого елементу
  2.  Вилучення заданого елемента з рядка

Пошук заданого елемента.

Розглянемо процедуру шукання заданого елемента. Попередньо опишемо тип, який відображає рядок символів як динамічну структуру. Складемо логічну функцію виявлення заданого символу в заданому динамічному рядку. Передбачимо як побічний ефект логічної функції шукання елемента вказівку на ланку, яка відповідає першому входженню заданого символу.

program Form2;

type

Link=^LRiad;

LRiad=Record

Elem: Char;

Next: Link;

end;

function SeekElem(Rjad:Link; Elm:char; var Res:Link): Boolean;

var Rb: Link;

begin

SeekElem:=False;

Res:=nil;

Rb:=Rjad^.Next;

while (Res=nil) and (Rb<>nil) do

if Rb^.EIem=Elm then

begin

SeekElem:=True;

Res:=Rb;

end

else Rb:=Rb^.next;

end;

begin

end.

Параметрами функції SeekElem є: вказівна змінна Rjad, що вказує на рядок символів; Elm, що містить шуканий елемент -символ; Res - вказівна змінна-результат, вказує на ланку, що містить шуканий елемент; Rb - робоча змінна вказівного типу.

Вилучення заданого елемента з рядка.

Описуючи цю процедуру, будемо задавати елемент, який треба вилучити, за допомогою вказівки на ту ланку ланцюга, після якої є елемент, що його потрібно вилучити.

Схематично процедуру вилучення зобразимо так. Нехай вихідний ланцюг є (опишемо фрагмент) таким, як показано на рис. 1.

Рис. 1. Фрагмент динамічного рядка.

Вилучення елемента В треба організувати так, щоб вказівка з ланки А була на ланку С. оминаючи ланку з елементом В (рис. 2).

Рис. 2. Вилучення ланки динамічного рядка.

Описуючи процедуру вилучення заданого елемента з рядка, передбачимо знищення всієї ланки, що містить цей елемент:

program Form3;

type

Link=^LRiad;

LRiad=record

Elem: Char;

Next: Link;

end;

procedure DelElem(Lanka: Link);

var Rb: Link;

begin

Rb:=Lanka^.Next;

Lanka^.Next:=Lanka^.Next^.Next;

dispose(Rb);

end;

begin

end.

Знищуємо ланку, що містить шуканий елемент, для економії пам'яті.


 

А также другие работы, которые могут Вас заинтересовать

83151. Контроль и учет в компании 85.24 KB
  Планы не всегда выполняются так, как было задумано. Люди не всегда принимают делегированные им права и обязанности. Руководству не всегда удается должным образом мотивировать людей на достижение поставленных целей. Меняются условия окружающей среды, и организация должна соответственно к ним адаптироваться.
83152. Разработка стратегии деятельности ОАО «КЭМЗ» на рынке 211.05 KB
  Целью данной курсовой является развитие процесса исследования среды маркетинга ОАО «КЭМЗ». Задачи курсовой работы: определить сущность и значение исследовательской деятельности маркетинговой среды предприятия; изучить процесс исследования среды маркетинга предприятия...
83153. The English Articles and its development in the History of English language and English Grammar 87.06 KB
  The development of the nаtion is essentiаl for the development of every person belonging to it; becаuse his understаnding аnd percepting the world is formed аccording to the society he grows up in аnd is influenced by the norms аnd vаlues of this society.
83154. Страхование в системе финансов 231.5 KB
  Страхование - это особый вид экономических отношений, призванный обеспечить страховую защиту людей (или организаций) и их интересов от различного рода опасностей. Страхование - одна из древнейших категорий, отражающих особую сферу экономических отношений общества.
83155. Разработка ассортимента современных рыбных блюд 1.09 MB
  Постоянный рост на рынке услуг общественного питания, возникновение и развитие новых концепций и форм обслуживания диктует необходимость гибкого изменения структуры предприятия. Успешная деятельность предприятия питания зависит от того, в какой степени заведению удается привлечь и удержать клиентов.
83156. Эволюция стратегического менеджмента. Основные школы стратегического менеджмента 157 KB
  Актуальность и значение темы доказываются тем, что значение стратегии, позволяющей фирме выживать в конкурентной борьбе в долгосрочной перспективе, резко возросло в последние десятилетия. Ускорение изменений в окружающей среде, появление новых запросов и изменение позиции потребителя...
83158. Численные методы решения инженерных задач на ЭВМ 324.33 KB
  Программа должна работать с любыми значениями аргумента из области определения функции. Обязательно наличие заголовка с указанием функции расположенного над графиком координатной сетки и заданного максимального и минимального значения функции в этом интервале.
83159. Финансы и финансовая система Российской Федерации 90.6 KB
  Финансовая система Российской Федерации. Финансовая политика Российской федерации Выводы Введение Актуальность данной темы обусловлено тем что финансовая система является основой обеспечения государственного суверенитета безопасности и развития страны а финансовые показатели являются основой для оценки эффективности государственной экономической политики. Для достижения указанной цели поставлены следующие задачи: изучить сущность и признаки финансов выявить функции финансов и роль финансов в системе денежных отношений рыночного хозяйства...