by Saifudeen & Rawoof (3 Submissions)
Category: Math/Dates
Compatability: Visual Basic 4.0 (32-bit)
Difficulty: Unknown Difficulty
Originally Published: Thu 4th March 2004
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Finding Biggest Among n Numbers
API Declarations
Dim a(50) As Integer
Dim big As Integer
n=Inputbox("Enter the Number of Terms:")
For i=1 To n
a(i)=Inputbox("Enter the numbers one-by-one:")
Next i
big=a(0)
For j=1 To n
If big>a(i) Then big=a(i)
Next
Msgbox "Biggest is " & big
End Sub