Red de conocimiento informático - Problemas con los teléfonos móviles - Utilice VB.NET para encontrar la suma y el promedio de los datos en una matriz.

Utilice VB.NET para encontrar la suma y el promedio de los datos en una matriz.

Copie el siguiente código directamente en el formulario y pruebePrivate Sub Form_Load()

Dim n As Integer

Dim a() As Single

Dim i As Integer

Dim sum como único

Dim incluso como único

Dim n = CInt(Val(InputBox("Ingrese una matriz de datos, la suma de los datos, y el promedio de los datos.")). Dim even As Single

n = CInt(Val(InputBox("Ingrese el número de números almacenados en la matriz: ")))

ReDim a(n) As Single

sum = 0

For i = 1 To n

a(i) = Val( InputBox( "Por favor ingrese el primer número " amp; i amp; "(***" amp; n amp; "número)"))

suma = suma a(i)

even = suma / n

MsgBox "La suma de los números en la matriz es " amp sum amp ", y el promedio es " amp; p> Fin Sub

Fin Sub