Step 5: Showing the minimum and maximum items
To find the minimum item of the circularly linked list, you need to compare each item of the list by allowing a min variable to point to the first item of the list then starting to compare its data with its next item. If the data of its next item is less than the data of the min, simply allow the min to catch the next item.
'Find the min item
Finding the maximum item of the circularly linked list can be done similarly as finding the minimum item. You need to compare each item of the list by allowing a max variable to point to the first item of the list then starting to compare its data with its next item. If the data of its next item is greater than the data of the max, simply allow the max to catch the next item.
'Find the max item
Public Overrides Function findmax() As ListNode
Dim t, max As ListNode
max = pfirst
If (Not IsNothing(pfirst)) Then 'not circularly linked list
t = pfirst.nextlk
While Not Object.Equals(t, pfirst)
If (max.val < t.val) Then
max = t
t = t.nextlk
Return Nothing 'empty circularly linked list
This website intents to provide free and high quality tutorials, examples, exercises and solutions, questions and answers of programming and scripting languages: