Perl y funciones de las raíces cuadradas

Perl, o Práctico de Extracción e Informe de idiomas, es un lenguaje de programación informática optimizada para las operaciones en grandes cantidades de datos con dibujos. Sin embargo, Perl también puede manejar la mayoría de los cálculos matemáticos normales, como la raíz cuadrada. Mediante el uso de paquetes externos, la función raíz cuadrada Perl puede operar en cualquier formato de datos numéricos disponibles en Perl.

Raíz cuadrada

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

$ Resultado = sqrt ($ some_number);
Resultado de la impresión $;

Números complejos

De forma predeterminada, teniendo una raíz cuadrada de un número negativo devolverá un error en Perl. Sin embargo, si ha incluido el "Matemáticas :: Complejo" paquete, todas las operaciones matemáticas se pueden realizar en los números complejos. Los paquetes se incluyen en los archivos Perl usando el comando use.

Usamos Matemáticas :: Complejo;
$ My_root = sqrt (-144); #returns 12i
print $ 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 código siguiente.

$ = $ Cube_root my_num ** (1/3);
print $ cube_root;

Programa de ejemplo

Para ejecutar completamente un programa de ejemplo en Perl para tomar la raíz cuadrada u otra, 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 'El% 1% de la raíz d de% 2% d es% 3% f \ n.', $ my_root, $ my_num, ($ my_num ** (1 / $ my_root));