End Function. Пример оформления контрольной работыПример оформления контрольной работы Задание 1. В MS Excel, используя VBA, напишите функцию пользователя, вычисляющую длину окружности по формуле 2pR, где R – радиус окружности. При помощи данной функции выполните расчеты для окружностей с заданными радиусами (0,5; 1; 1,5; 2; 2,5; 3; 3,5; 4; 4,5; 5). Public Const Pi = 3.141592653
Function Длина_окружности (Радиус As Single) As Single Длина_окружности = 2 * Pi * Радиус End Function
Рисунок 1. Использование функции Длина_окружности Задание 2. В MS Excel, используя VBA, напишите рекурсивную функцию, вычисляющую член последовательности, заданной формулой Function Ai(i As Integer, A1 As Integer) As Integer If i = 1 Then Ai = A1 Else Ai = Ai(i - 1, A1) + A1 End If
|
, при i >1. Значение первого члена последовательности вводится пользователем. При помощи данной функции выведите первые 10 членов последовательности.
