Visual Basic - ayuda

Life is soft - evento anual de software empresarial
 
Vista:

ayuda

Publicado por carlos fernando (1 intervención) el 24/06/2006 05:27:55
porfa nesecito un programa con arrays que lea n enteros donde (n<=10) y calcule la media de los que esten en posiciones pares ejm

tengo 20--5-8-1-7-2-5-8
el 20 esta en la primera posicion el 5 el la posicion dos que es par por lo tanto tiene que calcular 5+2/2

porfa ayudenme si es para el examen de grado mi correo es [email protected]
mi celu 093960972 espero que me puedan yudar gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ayuda

Publicado por kiko (26 intervenciones) el 24/06/2006 18:47:07
¿Qué tipo de media es esa? Aritmética, geométrica armónica, estadística, ponderada. cuadrática, proporcional?
La media (normalmente aritmética) de tu ejemplo tomando los números en posición par, sería:
(5+1+2+8)/4 = 4
aplicado a VB, ésta sería una forma

Dim a() As Integer
Dim i As Integer, n As Integer
Dim resultado As Double
ReDim a(7) ' número de elementos menos 1
' cargamos la matriz
a(0) = 20
a(1) = 5
a(2) = 8
a(3) = 1
a(4) = 7
a(5) = 2
a(6) = 5
a(7) = 8
For i = 1 To UBound(a) Step 2 ' ignoramos los de la posición impar
n = n + 1 ' contador de números sumados
resultado = resultado + a(i) ' suma los números de la posición par
Next i
resultado = resultado / n ' sacamos la media aritmética
MsgBox resultado ' resultado es 4
Si no es ésto lo que quieres, postea.
Que tengas suerte en tu examen y si te vale lo anterior, no le digas al profe que te lo pasé yo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar