En este post presentaremos otro ejercicio basico "Hallar el Area del Triangulo".
1. Creamos un proyecto elegimos Aplicacion de Consola.
2. Luego añadimos este codigo dentro del Sub Main().
Module Module1
Sub Main()
Dim b As Double, h As Double
Console.WriteLine("Ingresa base")
b = Convert.ToDouble(Console.ReadLine())
Console.WriteLine("Ingresa altura")
h = Convert.ToDouble(Console.ReadLine())
Dim area As Double
area = b * h / 2
Console.WriteLine("El area del triangulo es:")
Console.WriteLine(area)
Console.ReadLine()
End Sub
End Module



0 comentarios:
Publicar un comentario