Извлечь корень

Можно ли в редакции 7.7 извлечь корень из числа? Если да то как!?

"Встроенной функции нет. Нашла в интернете:

Функция Корень(Основание,Степень)
Если Степень = 1 Тогда Возврат(Основание);
КонецЕсли;
Факториал = 1; Степень_ = 1; Сум = 0;
СтепеньЕ = 1/Степень*Лог(Основание);
Для ии = 1 по 28 Цикл
Факториал = Факториал * ии;
Степень_ = Степень_ * СтепеньЕ;
Сум = Сум + Степень_/Факториал
КонецЦикла;
Возврат(1+Сум);
КонецФункции"

"При "СтепеньЕ = 1/Степень*Лог(Основание);" происходит деление на 0"

"А так?

Функция Корень(Основание,Степень)
Четность = Степень / 2;
Если (Основание < 0) И (Четность = Окр(Четность)) Тогда
Предупреждение("Для четной степени корня основание должно быть неотрицательным");
Возврат("""");            
ИначеЕсли (Основание < 0) И (Четность <> Окр(Четность)) Тогда
Основание = -1 * Основание;
Флаг  = 1;
КонецЕсли;
Если (Степень = 1) ИЛИ (Основание = 1) Тогда
Если Флаг = 0 Тогда
Возврат(Основание);
Иначе
Возврат(- 1 * Основание);
Основание = -1 * Основание;
КонецЕсли;
КонецЕсли;
Если (Степень = 0) И (Основание = 0) Тогда
Возврат(0);
ИначеЕсли (Степень = 0) И (Основание <> 0) Тогда
Возврат(1);
ИначеЕсли (Степень <> 0) И (Основание = 0) Тогда
Возврат(0);
КонецЕсли;
Факториал = 1; Степень_ = 1; Сум = 0;
СтепеньЕ = 1/Степень*Лог(Основание);
Для ии = 1 по 28 Цикл
Факториал = Факториал * ии;
Степень_ = Степень_ * СтепеньЕ;
Сум = Сум + Степень_/Факториал
КонецЦикла;
Если Флаг = 1 Тогда
Основание = -1 * Основание;
Возврат(-1 * (1+Сум));
Иначе
Возврат(1+Сум);
КонецЕсли;
КонецФункции"