Perl o Práctico de Extracción e Informe Language, es un lenguaje de scripting optimizado por ordenador para las operaciones en grandes cantidades de datos estampados. Sin embargo , Perl también puede manejar cálculos matemáticos más normales, como la raíz cuadrada. Mediante el uso de paquetes externos , la función de raíz cuadrada Perl puede operar en cualquier formato de los datos numéricos disponibles en Perl. Square Root

El paquete base de Perl contiene funciones matemáticas básicas , como la raíz cuadrada. El sqrt Perl () toma la raíz cuadrada de cualquier número dado como argumento. Si no se incluye el argumento , la sqrt () función actúa sobre la variable $ _

$ result = sqrt ($ some_number ) . Print $ result ;
números complejos

Por defecto, tomar una raíz cuadrada de un número negativo devuelve un error en Perl. Sin embargo , si ha incluido el " Math :: Complejo " paquete , todas las operaciones matemáticas se pueden realizar en los números complejos . Los paquetes se incluyen en los archivos Perl utilizando el comando use

uso Matemáticas :: Complejo ; . $ My_root = sqrt ( -144 ) # devuelve 12iprint $ my_root ;
Otros Roots

a raíz es equivalente a un número elevado a un exponente fraccionario . Para tomar una raíz que no sea una raíz cuadrada en Perl , utilice el operador "**" exponencial con un exponente fraccionario . Por ejemplo, para tomar la raíz cúbica de un número, utilice el siguiente código

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

para ejecutar plenamente el programa de ejemplo de Perl para tomar la plaza u otro root, ejecute el siguiente programa.

#! /usr /bin /local /perl

my_num = $ 64 , $ my_root = 3 ;

printf ' La raíz cuadrada del 1 % % d es % 2 % f \\ n ". , $ my_num , sqrt ($ my_num ) ; printf ' . % 1 % raíz d de% 2 % d es% 3 % f \\ n " , $ my_root , $ my_num , ($ my_num ** ( 1 /$ my_root ) ) ;