как поместить список в массив
циклом.
Я знаю что циклом но у меня не получилось
.
n:=0;
while L1<>nil do
begin
A[i]:=L1^.T;
L1:=L1^.P;
n:=n+1;
end;
n := 0;Тоже не получается?
while L1<>nil do begin
n := n + 1;
A[n]:=L1^.T;
L1:=L1^.P;
end;
А как массив в список
Точно так же - проходишь по всему массиву, и для каждого его элемента вызываешь функцию добавления элемента в список (поскольку КАК организован список у тебя - неизвестно, точнее сказать не могу)