hallar la resta de 2 números siempre y cuando el primero sea mayor que el segundo
Module Module1
Sub Main()
Dim x, y, z As Double
Console.Write("ingrese #1 :")
x = Console.ReadLine
Console.Write("ingrese #2 :")
y = Console.ReadLine
If x < y Then
Console.Write("EL PRIMER NUMERO DEBE DE SER MAYOR QUE EL SEGUNDO")
Else
z = x - y
Console.Write("EL RESULTADO ES : " & z)
End If
Console.Read()
End Sub
End Module
No hay comentarios:
Publicar un comentario