Помогите, кто знает хорошо visual basicНужно прописать…

Среднее абсолютное отклонениеMAD=Сумма (по i от 1 до n) |x (i) — ~x| / nПрограммаSredx=0For i=1 To n Sredx=Sredx+x (i) Next iSredx=Sredx / n ' посчитали среднее арифметическое ~xMAD=0For i=1 To n MAD=MAD+Abs (x (i) — Sredx) Next iMAD=MAD / n ' посчитали среднее абсолютное отклонениеСреднее квадратическое отклонениеMQD=Sqrt (Сумма (по i от 1 до n) (x (i) — ~x) ^2 / n) ПрограммаMQD=0For i=1 To n MQD=MQD+(x (i) — Sredx) ^2Next iMQD=(MQD / n) ^ (1/2) ' посчитали среднее квадратическое отклонениеOtnos=MQD / MAD ' посчитали отношение квадратического к абсолютномуСреднее арифметическое из средних абсолютных отклонений поддиапазоновПосчитай MAD в каждом поддиапазоне отдельно, а потом среднее арифметическое, как в цикле Sredx.