Visual Basic

1. Dim A,T,V As Double

Dim E As Double

‘ ingresar el tiempo del móvil

Console.write(“ingrese el tiempo del móvil: ”)

T=console.readline

‘ingresar la velocidad del móvil

Console.write(“ingresar la velocidad del móvil: “)

V=console.readline

‘ingresar la aceleración del móvil

Console.write(“ingrese la aceleración del móvil: ”)

A =console.readline

‘calculamos el espacio recorrido

E=V*T+0.5*A*(T*T)

‘mostramos el espacio recorrido por el móvil

Console.writeline(“el espacio recorrido por el móvil es: {0}”, E)

console.readline()

2. Dim N1,N2,N3 As Double

Dim Pf As Double

‘ ingresar la primera nota

Console.write(“ingrese la primera nota: ”)

N1=console.readline

‘ ingresar la segunda nota

Console.write(“ingresar la segunda nota: “)

N2=console.readline

‘ ingresar la tercera nota

Console.write(“ingrese la tercera nota : ”)

N3 =console.readline

‘calculamos el promedio final

Pf=(N1+N2+N3) 1/3

‘mostramos el promedio final

Console.writeline(“el promedio final es: {0}”, Pf)

console.readline()

3. Dim Ppd,E,F,M As Double

Dim Pj As Double

‘ ingresar días del mes de Enero

Console.write(“ingrese días del mes de Enero: ”)

E=console.readline

‘ ingresar días del mes de Febrero

Console.write(“ingrese días del mes de Febrero: ”)

F=console.readline

‘ ingresar días del mes de Marzo

Console.write(“ingrese días del mes de Marzo: ”)

M=console.readline

‘ ingresar pago por dia

Console.write(“ingrese Pago por dia: ”)

Ppd=console.readline

‘calculamos el pago jornal

Pj=Ppd*(E+F+M)

‘mostramos el pago jornal

Console.writeline(“el pago jornal es: {0}”, Pj)

console.readline()

...