Массивы. Сумма среднего геометрического значения элементов и среднего арифметического значения элементов - Visual Basic .NET

Формулировка задачи:

Доброго времени суток! Прошу помощи с задачей про массивы: Даны массивы А(5) и В(5), состоящие из положительных элементов. Найти сумму среднего геометрического значения элементов массива А и среднего арифметического значения элементов массива В.

Решение задачи: «Массивы. Сумма среднего геометрического значения элементов и среднего арифметического значения элементов»

textual
                            Листинг программы 
                        

                            dim sg as double 
dim sa as double 
for i = 0 to 5
   sg=sg*A(i)
   sa=sa+B(i)
next
msgbox math.pow(sg, 1/6)+sa/6
                        