unit Types;
interface
 Type
    Telem=integer;
    TStack=^Telement;
    Telement=Record
              Info:Telem;
              Next:TStack
             End;

    T = Integer;
      TTree = ^TNode;
	      TNode = record
		            value: T;
		            Left, Right: TTree;
	end;
implementation
end.