Помогите, кто знает хорошо visual basicНужно прописать в программеФункция должна...

Question

Помогите, кто знает хорошо visual basic
Нужно прописать в программе
Функция должна возвращать
Величину
среднего абсолютного отклонения
Отношение
среднего квадратического отклонения к среднему абсолютному отклонению
Среднее
арифметическое из средних абсолютных отклонений поддиапазонов

Answer 1

Среднее абсолютное отклонение
MAD = Сумма (по i от 1 до n) |x(i) - ~x| / n
Программа
Sredx = 0
For i = 1 To n
   Sredx = Sredx + x(i)
Next i
Sredx = Sredx / n ' посчитали среднее арифметическое ~x
MAD = 0
For i = 1 To n
   MAD = MAD + Abs(x(i) - Sredx)
Next i
MAD = MAD / n ' посчитали среднее абсолютное отклонение

Среднее квадратическое отклонение
MQD = Sqrt(Сумма (по i от 1 до n) (x(i) - ~x)^2 / n)
Программа
MQD = 0
For i = 1 To n
   MQD = MQD + (x(i) - Sredx)^2
Next i
MQD = (MQD / n)^(1/2) ' посчитали среднее квадратическое отклонение
Otnos = MQD / MAD ' посчитали отношение квадратического к абсолютному

Среднее арифметическое из средних абсолютных отклонений поддиапазонов
Посчитай MAD в каждом поддиапазоне отдельно, а потом среднее арифметическое, как в цикле Sredx.

Comments

(по i от 1 до n) вот как вот этот кусок прописать? в бейсике?

---

А средним арифметическим ты не мог бы расписать, а то я не въехал. Никогда не делал ничего подобного)

---

(по i от 1 до n) - в бейсике расписывается как цикл For i = 1 To n. Число n должно быть задано заранее! Введи его в текстовом поле, а в программе перед всеми циклами напиши n = Val(Text1.Text)

---

Среднее арифметическое - это сумма всех чисел, деленная на количество чисел. Делается циклом, где я считаю Sredx.