VBA Excel Вычисление суммы ряда по формуле
Формулировка задачи:
Разработать макро функцию с одним параметром “x", которая рассчитывает см рис.
В функции запрещено использовать условный оператор возведения в степень и оператор (if) !
Решение задачи: «VBA Excel Вычисление суммы ряда по формуле»
textual
Листинг программы
Function ResultX(x) per = x Stepen = 20 For i = 2 To Stepen Step 2 For j = 2 To i x = x * per Next j Select Case (i / 2) Mod 2 Case 1 ResultX = ResultX + x Case 0 ResultX = ResultX - x End Select x = per Next i End Function