bel. lange Integerzahlen in dynamischen Listen???

[Xeni]

ne ich glaube nicht, dass ich weis was ich machen soll, aber so was ähnliches:
Type Personentyp = Record
Name, Vorname : String[20];
Strasse : String[40];
PLZ : String[8];
Ort : String[40];
End;

Zeigertyp = ^elementtyp;
elementtyp = Record
Inhalt : Personentyp;
next : Zeigertyp;
End;
Var neu, vor, lauf,pos, anfang : Zeigertyp;
Person : Personentyp;


Procedure init;
Begin { Initialisierung einer leeren Liste }
anfang := nil;
End

Procedure einfuegen;
Begin { Schaffen eines freien Elementes }
new(neu);
{ Eintragen des Inhaltes in freies Element }
neu^.inhalt:=person;
neu^.next:=nil;
{ Suchen der Einfügestelle }
vor:=anfang;
lauf:=anfang;
while (lauf <> nil ) and
(lauf^.inhalt.name <= Person.name) Do
Begin
vor:= lauf; lauf:=lauf^.next;
End;
{ Einfügen in die Struktur }
if vor = lauf Then Begin anfang:=neu;
neu^.next:=lauf End
else Begin vor^.next:=neu; neu^.next:=lauf;
End;
End;

nur muss ich das jetzt mit den zahlen machen und nicht mit namen oder vornamen!