Documento

Module Module1

Sub Main()


Dim a As Double = 3
Dim b As Double = 3
Dim c As Double = 3
Dim d As Double = 3
Dim e As Double = 3
Dim f AsDouble = 3
Dim g As Double = 3
Dim ecuacion1 As Double
Dim ecuacion2 As Double
Dim ecuacion3 As Double
Dim ecuacion4 As Double
Dim ecuacion5 As DoubleDim ecuacion6 As Double
Dim ecuacion7 As Double
Dim ecuacion8 As Double
Dim ecuacion9 As Double
Dim ecuacion10 As Double
Dim ecuacion11 As DoubleDim ecuacion12 As Double
Dim ecuacion13 As Double
Dim ecuacion14 As Double
Dim i As Integer
i = 10000

ecuacion1 = a * 3334
ecuacion2 = b * 3334ecuacion3 = c * 3334
ecuacion4 = d * 3334
ecuacion5 = e * 3334
ecuacion6 = f * 3334
ecuacion7 = g * 3334

ecuacion8 = ecuacion1 / 3 / 60
ecuacion9 = b *3334 / 3 / 60
ecuacion10 = c * 3334 / 3 / 60
ecuacion11 = d * 3334 / 3 / 60
ecuacion12 = e * 3334 / 3 / 60
ecuacion13 = f * 3334 / 3 / 60
ecuacion14 = g * 3334/ 3 / 60


System.Console.WriteLine(" el primer día recorre =: " & ecuacion1)
System.Console.WriteLine(" el segundo día recorre =: " & ecuacion2)
System.Console.WriteLine(" eltercer día recorre =: " & ecuacion3)
System.Console.WriteLine(" el primer día recorre =: " & ecuacion4)
System.Console.WriteLine(" el primer día recorre =: " & ecuacion5)System.Console.WriteLine(" el primer día recorre =: " & ecuacion6)
System.Console.WriteLine(" el primer día recorre =: " & ecuacion7)

System.Console.WriteLine(" y el tiempo que tarda enminutos es = " & ecuacion8)
System.Console.WriteLine(" y el tiempo que tarda en minutos es = " & ecuacion9)
System.Console.WriteLine(" y el tiempo que tarda en minutos es = " &...