Υλοποίηση σε Pascal

Οι ακμές υλοποιούνται με τη χρήση δεικτών της Pascal.
Τα στοιχεία ομαδοποιούνται με τους δείκτες ως μια εγγραφή.
Οι εξωτερικοί κόμβοι συμβολίζονται με την ειδική τιμή δείκτη της Pascal nil.
Μνήμη για κάθε στοιχείο αποκτούμε με τη χρήση της διαδικασίας new.

Παράδειγμα:

program bintree;

type
    binTree = ^binTreeElem;

    binTreeElem = record
        val : integer;
        left : binTree;
        right : binTree;
    end;


var
    theTree, node : binTree;

begin
    new(node);
    node^.val := 5;
    node^.left := nil;
    node^.right := nil;
    theTree := node;

    new(node);
    node^.val := 12;
    node^.left := nil;
    node^.right := nil;
    theTree^.right = node;
end.

ΠροηγούμενηΙδιότητες
Περιεχόμενα
ΕπόμενηΔένδρα αναζήτησης