помогите, не могу понять из-за чего не стала работать программа....вот архив
до этого работала, потом всё зависло.. и если можете обьясните как можно перезаписать
begin
rec1:=recs;
while rec1.next <> nil do
rec1:=rec1.next;
rec1.next:=rec2; // переделать
end;
добавление в очередь,чтоб он к предпоследнему цеплялся, а не проходил весь список.
begin
rec1:=recs;
while rec1.next <> nil do
rec1:=rec1.next;
rec1.next:=rec2; // переделать
end;
добавление в очередь,чтоб он к предпоследнему цеплялся, а не проходил весь список.
Добавь еще указатель на последний.
