Как сравнивать два элемента линейные списки, есть код

19.05.2012, 17:09. Показов 856. Ответов 0

Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам

Pascal

procedure CreateList(var t1,L1,t2,L2:plist);
var 
tmp1, tmp2:plist;
newlist:plist;
p,q:integer;
begin
    t1 := L1;
    t2 := L2;
    while t1 <> nil do
    begin
      
      write(t1^.Data, ' ');
      t1 := t1^.Next;
     
     
      while t2 <> nil do
      begin
      write(t2^.data, '  ');
      tmp2:=t2;
      t2 := t2^.Next;
      
       if(t2 = tmp1^.next) then// вот здесь как сравнить
       begin
       tmp1 := t1; 
       t1 := t1^.Next;
       Dispose(tmp1); 
       end;
    end; 
    end;
Writeln;
readkey;
end;

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

19.05.2012, 17:09

Ответы с готовыми решениями:

Линейные списки: выяснить есть ли среди заданных чисел одинаковые
Помогите решить задачу плиззз.Она не трудная, но я не шарю... Даны n целых чисел x1 х2 х3......

Ошибка. Линейные списки - удаляется два элемента вместо второго
Procedure Udal_2; {Удаление из Списка 1,2,Пред. Последнего и Последнего} Begin...

Линейные односвязные списки. Вставка элемента
Добрый день! Никогда не была в ладах со списками, поэтому очень нужна помощь! как сделать...

Проверка на существование элемента по ключу. Линейные списки
Собственно вроде все работает, только не получается сделать, чтобы при добавлении нового элемента...

	19.05.2012, 17:09

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

19.05.2012, 17:09

Помогаю со студенческими работами здесь

Однонаправленные линейные списки (доделать код)
Программа должна выводить список имен и их количество в файле, используются списки Помогите...

Не могу написать код к задаче. Линейные односвязные списки
добавлением нового элемента в начало списка нужно удвоить в списке каждое вхождение нулевого...

Удалить из списка последний отрицательный элемент, если такой есть (линейные списки)
Помогите, пожалуйста. Нужно, написать программу, которая удаляет из списка последний отрицательный...

Нельзя сравнивать два типа (Т1 и Т1), как это исправить?
Вот код public void Search(Т1 a) { for (int i = 0; i < this.size; i++) ...

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

Или воспользуйтесь поиском по форуму:

Наверх