Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Корень_квадратный
 
 автор: час   (13.05.2011 в 22:55)   личное сообщение
 
 

А как записать в коде
Корень_квадратный (12)
Sqr(12)

  Ответить  
 
 автор: ДрЮня   (13.05.2011 в 22:59)   личное сообщение
 
 

12^(1/2)

  Ответить  
 
 автор: час   (13.05.2011 в 23:08)   личное сообщение
 
 

  Ответить  
 
 автор: Анатолий (Киев)   (17.05.2011 в 15:22)   личное сообщение
 
 

На заметку...
Корень любой степени:

Function SqrN(anyValue As Variant, n As Double) As Double
'Вычисляет корень n степени для значения anyValue
'anyValue должно быть больше 0, иначе функция возвращает 0.
 If Not IsNumeric(anyValue) Then
        SqrN = 0
        Exit Function
 End If
 If anyValue <= 0 Then
         SqrN = 0
        Exit Function
 End If
    SqrN = Exp(1 / n * Log(CDec(anyValue)))
End Function

  Ответить  
 
 автор: час   (17.05.2011 в 15:25)   личное сообщение
 
 

Спасибо!!!

  Ответить  
 
 автор: Силblч   (17.05.2011 в 15:25)   личное сообщение
 
 

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList