Ayudenme Por Favor!!!!!
necesito crear un algoritmo y/o Programa que pueda realizar la media aritmetica de 50 numeros, y pueda correr em visual basic.. por favor lo necesito para hoy me podrian ayudar.. gracias.
Te refieres a la suma de los números del 1 al 50 divididos entre 50? o los 50 números serían aleatorios?
bueno rosa el programa es realizado con la formula de la media aritmetica, y es la suma de los numeros del 1 al 50 dividido entre 50. lo que se es que se realiza con la formula de la media aritmetica......
ok, entonces sólo es esto:
Private Sub Command1_Click()
Dim Contador As Integer \\\\'Variable para el bucle
Dim Suma As Integer \\\\'Acumulador
Dim Media As Double \\\\'Variable para la media que puede ser decimal por eso el tipo de dato double
Const CNMax As Integer = 50 \\\\'Se declara una constante con el número máximo
Suma = 0 \\\\'Se inicializa la variable que acumula la sumatoria
For Contador = 1 To CNMax
Suma = Suma + Contador \\\\'Suma de los CNMax números
Next
Media = Suma / CNMax \\\\'Calculo de la media
MsgBox Media
End Sub
Ahora sólo conviértelo a pseudocodigo.
Con el código que te pasé anteriormente pudiste haber desarrollado este ejercicio, al menos deberías intentarlo, no es difícil.
Private Sub Command1_Click()
Dim Contador As Integer \\\\'Variable para el bucle
Dim Suma As Integer \\\\'Acumulador
Dim Media As Double \\\\'Variable para la media que puede ser decimal por eso el tipo de dato double
Const CNMax As Integer = 50 \\\\'Se declara una constante con el número máximo
Suma = 0 \\\\'Se inicializa la variable que acumula la sumatoria
For Contador = 1 To CNMax
Suma = Suma + Contador \\\\'Suma de los CNMax números
Next
Media = Suma / CNMax \\\\'Calculo de la media
MsgBox Media
End Sub
Ahora sólo conviértelo a pseudocodigo.
Con el código que te pasé anteriormente pudiste haber desarrollado este ejercicio, al menos deberías intentarlo, no es difícil.