Форум: "Начинающим";
Текущий архив: 2009.02.08;
Скачать: [xml.tar.bz2];
Вниз
динамические структуры Найти похожие ветки
← →
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;
По делу - что не получается? Нужно обдумать алгоритм, саму вставку сначала нарисовать на бумаге, прикинуть, как будут изменяться связи.
← →
Сергей М. © (2008-12-23 08:12) [2]http://pascal.helpov.net/index/dynamic_lists_pascal_programming
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.02.08;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c
