Написать процедуру удаления заданного значения из односвязного списка

@alushta2123 · Регистрация: 27.11.2022

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

В односвязном списке хранятся целые числа. Написать процедуру удаления заданного значения из списка.

@bormant · 27.11.2022, 19:48

Что уже написали? Что не получается?

@JuriiMW · 28.11.2022, 04:55

Pascal

type
  tList=^pList;
  pList=record
    n:integer;
    x:tList;
  end;
 
. . . . .
 
procedure deleteValue(v:Integer;var l:tList);
var c,t:tList;
begin
  if l=nil then exit;while l^.n=v do begin t:=l;l:=l^.x;dispose(t);if l=nil then
  exit;end;c:=l;while c^.x<>nil do if c^.x^.n=v then   begin t:=c^.x;c^.x:=t^.x;
  dispose(t);end else c:=c^.x;
end;
 
. . . . .

@alushta2123 0 / 0 / 0 Регистрация: 27.11.2022 Сообщений: 5
		1
	Написать процедуру удаления заданного значения из односвязного списка 27.11.2022, 17:46. Показов 248. Ответов 2 Метки pascal, turbo, turbo pascal, список (Все метки) В односвязном списке хранятся целые числа. Написать процедуру удаления заданного значения из списка. 0

@bormant Модератор 7792 / 4616 / 2829 Регистрация: 22.11.2013 Сообщений: 13,112 Записей в блоге: 1
	27.11.2022, 19:48	2
	Что уже написали? Что не получается? 0

	28.11.2022, 04:55

Написать процедуру удаления заданного значения из односвязного списка

Решение