Perl, ou Prática de Extracção e Relatório Language, é uma linguagem de script computador otimizado para operações em grandes quantidades de dados padronizados . No entanto , Perl também pode lidar com a maioria dos cálculos matemáticos normais, como raiz quadrada . Usando pacotes externos , a função raiz quadrada Perl pode operar em qualquer formato de dados numéricos disponíveis em Perl. Raiz quadrada

O pacote base Perl contém várias funções matemáticas básicas, incluindo raiz quadrada . A função Perl sqrt () pega a raiz quadrada de qualquer número dado como um argumento. Se o argumento não for incluído, a função sqrt () atua sobre a variável $ _

$ result = sqrt ( $ some_number ); . Print $ result ;

Números Complexos

por padrão , tendo uma raiz quadrada de um número negativo retornará um erro em Perl. No entanto, se você tiver incluído o " Math :: Complex" pacote , todas as operações matemáticas podem ser realizadas em números complexos. Os pacotes são incluídos nos arquivos Perl usando o comando uso

usar Math :: Complexo ; . $ My_root = sqrt ( -144 ); # retorna 12iprint $ my_root ;
outras raízes

a raiz é equivalente a um número elevado a um expoente fracionário . Para tirar uma raiz diferente de uma raiz quadrada em Perl , utilize o operador exponencial "**" com um expoente fracionário . Por exemplo, para extrair a raiz cúbica de um número, use o seguinte código

$ cube_root = $ my_num ** ( 1/3) ; . Print $ cube_root ;
Amostra programa

para executar completamente um programa de exemplo em Perl para extrair a raiz quadrada ou outra , execute o seguinte programa.

# ! /usr /bin /local /perl

$ my_num = 64 ; $ my_root = 3;

printf ' . A raiz quadrada de % 1% d é% 2 % f \\ n' , $ my_num , sqrt ( $ my_num ); printf ' % 1 % d raiz de% 2 % d é% 3% f \\ n . ', $ my_root , $ my_num , ( $ my_num ** (1 /$ my_root ) ) ;