¡Tarea sencilla de programación en VB para el primer año! Ingrese las puntuaciones de tres materias principales desde el teclado y encuentre el promedio
Opción Base 1
Subcomando privado1_Click()
Atenuar a(3) como doble, a1 como doble
Atenuar promedio como Sencillo
Suma = 0
Para i = 1 a 3
a(i) = InputBox("Ingrese resultados", "No." & i & " Branch")
Suma = Suma + a(i)
Siguiente i
promedio = Suma / 3
promedio = Ronda ( aver, 2) 'round(m,n) toma n decimales para m
Imprimir aver 'Emite el promedio
End Sub