Dobrý den,
potřeboval bych poradit s procedurou.
Pseudokod:
1) Mám 2 spojové seznamy např.
a dvě globální proměnné s hodnotou integer.
2) Chtěl bych proceduru, která mi projede první spoják a pokud se tam vyskytuje první proměnná, tak do druhého spojáku přidá druhou hodnotu integer.. jinak pokud se tam nevyskytuje, tak přidá první hodnotu do prvního seznamu a do druhého seznamu přidá druhou hodnotu.
Pro příklad by to mělo vypadat takhle.
Mám 1 prom. = 1
2 prom. = 2
V prvním spojáku je už např. 1, tak to přidá do druhého spojáku 2.
Další příklad: mám 1.prom. = 1
2 prom. = 2
první spoják je prázdný, tak do prvního přidám hodnotu 1 a do druhého hodnotu 2.
type TList = ^Node;
Node = record
Info: integer;
Next: TList
end;
type TList2 = ^Node2;
Node2 = record
Info: integer;
Next: TList2
end;