Линейные списки

[Rusl92]

Здравствуйте, не могли бы вы мне помочь
я начал проходить линейные списки, но никогда раньше не работал с указателями
Не могли бы вы написать, как создать линейный список, забитый какими-то значениями в цикле...

у меня была вот такая идея, но список не строится

type
  ut=^tt;

  tt=record
   inf:integer;
   n:ut;
   end;

var
  a1,a2,k,k2,f:ut;
  i,j:integer;

begin
   i:=1;
   New(f);
   f^.inf:=4;
   a1:=f^.n;
   while i<=3 do
   begin
    New(a1);
    a1^.inf:=5;
    k:=a1^.n;
    New(k);
    k^.inf:=i;
    a1:=k^.n;
    inc(i,2);

   end;
end.

Заранее спасибо!)

[Grag]

Зайди на страничку моего сайта (http://igor-bachin.narod.ru/Pages/pfolio3.htm), там есть раздел "Динамические структуры данных". Качай архивы с исходниками и разбирайся... Не забудь оставить отзыв в гостевой книге!

[Rusl92]

это что за ответ?оО
не ожидал

[Grag]

Тебе уже готовые решения предложили... Там есть процедуры создания, удаления элементов списка, поиск и пр. Что еще нужно??? Списки линейные односвязные и двусвязные...