Escribe un programa en vb que ingrese 3 números, los sume y los promedie.

El código es el siguiente:

Sub Form_Click()

a = InputBox(w Ingresa el primer número "gt; a -Val(a)

b = InputBox(w Ingrese el segundo número") b = Val(b)

c = InputBox("Ingrese el tercer número c = VaKc)

d = InputBox(w Ingrese el cuarto número") d = Val(d)

c = InputBox(w Ingrese el tercer número c = VaKc)

d = InputBox( w Enter el cuarto número")Val(d)

suma = a b c d aver = suma / 4

Extensión:

Otro método:

Private Sub Form_Click()

Atenuar a como único

Para i = 1 a 4

a = InputBox("Ingrese un número :", "Entrada de datos")

Suma = Suma a

n = n 1

Promedio = Suma / n

Siguiente i

Imprimir "La suma es:", Suma

Imprimir "Promedio es:", Promedio

End Sub

End Sub