динамические структуры

← →
vinpol © (2008-12-23 03:19) [0]

помогите пожалуйста! очень прошу! на вас последняя надежда. нужно составить вот такую прогу: дан список а, который состоит из записей: первое поле - вещественное число, второе - адрес след. элемента. нужно составить прогу для вставки нового элемента Е1 перед последним вхождением элемента Е, если элемент есть в списке А.
program А;

{$APPTYPE CONSOLE}

uses
SysUtils;
type spB=^elem;
elem=record
info:string;
next:spB;
end;
var P,Pk:integer;

begin
new (P);
P^.info:=9;
P^.Link:=Pk.^Link;
Pk.^Link:=P;
{ TODO -oUser -cConsole Main : Insert code here }
end.

← →
MBo © (2008-12-23 07:51) [1]

info:string;
как-то не согласуется с
P^.info:=9;

По делу - что не получается? Нужно обдумать алгоритм, саму вставку сначала нарисовать на бумаге, прикинуть, как будут изменяться связи.

http://pascal.helpov.net/index/dynamic_lists_pascal_programming

динамические структуры Найти похожие ветки