unit Node;

interface

type
    TNode = class
        // левая и правая ноды
        Left, Right: TNode;
        // числовое значение, которое будет хранить каждая нода
        Value: Integer;
        // объявляем конструктор
        Constructor Create(Value: Integer);
    end;

implementation

Constructor TNode.Create(Value: Integer);
begin
    // в конструкторе присваиваем требуемое значение полю Self.Value
    // и говорим, что левая и правая ноды пустые
    Self.Left := nil;
    Self.Right := nil;
    Self.Value := Value;
end;

end.