UNIT uElem;

INTERFACE
    TYPE
        TElem = {El tipo de dato que tú definas};

    PROCEDURE Asignar (VAR variable:TElem; elem:TElem);

    PROCEDURE Mostrar (e:TElem);

IMPLEMENTATION

    PROCEDURE Asignar (VAR variable:TElem; elem:TElem);
        BEGIN
            variable := elem;
        END;

    PROCEDURE Mostrar (e:TElem);
        BEGIN
            {Depende del tipo de dato}
        END;
END.