Question

How to print the N largest numbers in array with VB.NET

Answer 1

Imports System

Public Class Program
    Public Shared Sub printNLargest(ByVal arr As Integer(), ByVal N As Integer)
        Array.Sort(arr)
        Array.Reverse(arr)

        For i As Integer = 0 To N - 1
            Console.Write(arr(i) & " ")
        Next
    End Sub

    Public Shared Sub Main()
        Dim arr As Integer() = New Integer() {50, 99, 20, 100, 76, 33, 87, 40, 80, 85}
	    Dim N As Integer = 4
	
        printNLargest(arr, N)
    End Sub
End Class




' run:
'
' 100 99 87 85
'

 

70+ SQL courses for beginners and professionals