Exercise
One or two negative numbers
Objetive
Create a Visual Basic (VB.Net) program to prompt the user for two numbers and determine whether both are negative, only one is negative, or neither is negative.
Code
Imports System
Public Class Exercise27
Public Shared Sub Main()
Dim number1 As Integer
Dim number2 As Integer
Console.Write("number 1: ")
number1 = Convert.ToInt32(Console.ReadLine())
Console.Write("number 2: ")
number2 = Convert.ToInt32(Console.ReadLine())
If (number1 < 0) AndAlso (number2 < 0) Then
Console.WriteLine("the numbers are negative")
ElseIf (number1 < 0) OrElse (number2 < 0) Then
Console.WriteLine("one is negative")
Else
Console.WriteLine("none is negative")
End If
End Sub
End Class