Frameworksp

Atalhos

Páginas filhas
  • Sqrt

Calcula o valor da raiz quadrada de um número positivo.

Sintaxe

Sqrt( < nRadicand > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

nRadicand

numérico

Indica o valor do radicando.

X

 

Retorno

Nome

Tipo

Descrição

nRet

numérico

Retorna a raiz quadrada.

Observações

  • Caso o parâmetro informado seja menor que 0, a raiz quadrada retornará o valor 0.

Exemplos

Exemplo 1
#DEFINE CRLF Chr(13)+Chr(10)
User Function sqrt1()
  Local cMensagem := ""
  
  //+----------------------------------------------------------------------------+
  //|Exemplifica o uso da função Sqrt                                            |
  //+----------------------------------------------------------------------------+
  
  cMensagem += "Sqrt(-9) = " + cValToChar(Sqrt(-9)) + CRLF
  cMensagem += "Sqrt( 0) = " + cValToChar(Sqrt( 0)) + CRLF
  cMensagem += "Sqrt( 1) = " + cValToChar(Sqrt( 1)) + CRLF
  cMensagem += "Sqrt( 2) = " + cValToChar(Sqrt( 2)) + CRLF
  cMensagem += "Sqrt( 3) = " + cValToChar(Sqrt( 3)) + CRLF
  cMensagem += "Sqrt( 4) = " + cValToChar(Sqrt( 4)) + CRLF
  cMensagem += "Sqrt( 5) = " + cValToChar(Sqrt( 5)) + CRLF
  cMensagem += "Sqrt( 9) = " + cValToChar(Sqrt( 9)) + CRLF
  cMensagem += "Sqrt(16) = " + cValToChar(Sqrt(16)) + CRLF
  cMensagem += "Sqrt(25) = " + cValToChar(Sqrt(25)) + CRLF
  cMensagem += "Sqrt(36) = " + cValToChar(Sqrt(36)) + CRLF
  
  //+----------------------------------------------------------------------------+
  //|Apresenta uma mensagem com os resultados obtidos                            |
  //+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do Sqrt")

Resultado do Exemplo

Abrangência

Microsiga Protheus 8.11, Protheus 10

Veja também

  • Sem rótulos