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
|