Question

write a program to enter 3 numbers then find the biggest one???

Answer 1

Module Module1
    'main function
    Sub Main()
        'array for user numbers
        Dim numbers(3) As Integer
        'enter 3 number
        For i As Integer = 0 To 2
            Console.Write("Enter number " + (i + 1).ToString() + ": ")
            numbers(i) = Integer.Parse(Console.ReadLine())
        Next
        'find The biggest number
        Dim max As Integer = numbers(0)
        For i As Integer = 0 To 2
            If (numbers(i) > max) Then
                max = numbers(i)
            End If
        Next
        'show result
        Console.Write("The biggest number is: " + max.ToString())
        Console.ReadLine() 'delay
    End Sub
End Module