Tree(8).left = nullPointer
Console.WriteLine(“Select from the following;”)
Console.WriteLine(“ A - Insert A New Node “)
Console.WriteLine(“ B - Delete A Node “)
Console.WriteLine(“ C - Search For A Node “)
Console.WriteLine(“ D - Display List in Order “)
Console.WriteLine(“ E - Exit “)
Dim Ans As Char = Console.ReadLine()
Console.WriteLine(“Input Value for Insertion”)
Dim newval As Integer = Console.ReadLine()
PROCEDURE InsertNode(newData)•
IF freePointer<>nullPointer•
NewNodePointerfreePointer•
freePointermyTree[freePointer].leftPointer•
myTree[NewNodePointer].leftPointernullPointer•
myTree[NewNodePointer].rightPointernullPointer
IF rootPointer= nullPointer•
rootPointerNewNodePointer•
ThisNodePointerrootPointer•
WHILE ThisNodePointer<> nullPointer DO•
PreviousNodePointer NewNodePointer•
IF myTree[ThisNodePointer].item > newData•
ThisNodePointermyTree[ThisNodePointer].leftPointer•
ThisNodePointermyTree[ThisNodePointer].rightPointer•
myTree[PreviousNodePointer].leftPointerThisNodePointer•
myTree[PreviousNodePointer].rightPointerThisNodePointer•
Console.WriteLine(“Input Value for Deletion”)
Dim delval As Integer = Console.ReadLine()
DeleteNode(delval, str, cur, free, prv, LinkedList)
Console.WriteLine(“Input Value for Search”)
Dim Sval As Integer = Console.ReadLine()
Search(Sval, str, cur, LinkedList)
Display(cur, str, LinkedList)
Console.WriteLine(“Please input a value between A and D inclusive”)