how to find greatest of n numbers!

Question Posted / ajay.hp1986

3 Answers
16129 Views
Syscon, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

how to find greatest of n numbers!..

Answer / mudaseer

dim varr(4),vhigh
for i=0 to 4 step 1
varr(i)=cint(inputbox("enter the value"))
next
vhigh=varr(0)
for i=1 to 4 step 1
if varr(i)>vhigh then
vhigh=varr(i)
end if
next
msgbox vhigh

Is This Answer Correct ?

7 Yes

1 No

how to find greatest of n numbers!..

Answer / raju

dim i, lar, j, a()
i=Cint(Inputbox("Enter the value how many value to be enter"))
for j=1 to i
ReDim a(i)
a(j)=inputbox("enter the numbers")
Next
lar=a(0)
for j=1 to i
If a(j)>lar Then
lar=a(j)
End IF
Next
msgbox "Largest Number is" & lar

Is This Answer Correct ?

6 Yes

4 No

how to find greatest of n numbers!..

Answer / venkatesh

option explicit
dim myarray,max,i
myarray = array( 34,23,45,67,12 )
max=myarray(0)
for i=0 to ubound(myarray)
if max < myarray(i) then
max=myarray(i)
end if
next
msgbox "max number is : "&max

Is This Answer Correct ?

5 Yes

5 No

Post New Answer