Calcula o logaritmo de um valor numérico.
Log10( < nValue > )
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
nValue | numérico | Indica o valor cujo logaritmo é calculado. | X |
|
Nome | Tipo | Descrição |
---|---|---|
nRet | numérico | Retorna o valor numérico do logaritmo de nValue. |
#DEFINE CRLF Chr(13)+Chr(10) user function log10() Local cMensagem := "" //+----------------------------------------------------------------------------+ //|Exemplifica o uso da função Log10 | //+----------------------------------------------------------------------------+ cMensagem += "Log10(1) = " + cValToChar( Log10( 1 ) ) + CRLF cMensagem += "Log10(10) = " + cValToChar( Log10( 10 ) ) + CRLF cMensagem += "Log10(100) = " + cValToChar( Log10( 100 ) ) + CRLF cMensagem += "Log10(1000) = " + cValToChar( Log10( 1000 ) ) + CRLF cMensagem += "Log10(10000) = " + cValToChar( Log10( 10000 ) ) + CRLF //+----------------------------------------------------------------------------+ //|Apresenta uma mensagem com os resultados obtidos | //+----------------------------------------------------------------------------+ Return MsgInfo(cMensagem, "Exemplo do Log10")
Microsiga Protheus 8.11, Protheus 10