Ok, tak jsem došel k problému...
Nejsem schopen vytvořit proceduru pro přidání prvku na konec seznamu..
Proceduru, která přidá prvek na začátek seznamu chápu a nepřijde mi nijak složitá.
procedure Pridej(var Seznam: Spoj; X: Integer);
var Novy: Spoj;
begin
new(Novy);
Novy^.Hodnota := X;
Novy^.Dalsi := Seznam;
Seznam := Novy;
end;
Díky
end;