Perl , ou d'extractions pratiques et le rapport Language, est un langage de script informatique optimisé pour les opérations sur de grandes quantités de données motifs. Cependant , Perl peut aussi traiter des calculs mathématiques plus normales, comme la racine carrée. En utilisant des paquets externes , la fonction racine carrée Perl peut fonctionner sur n'importe quel format de données numériques disponibles en Perl. Photos

Le forfait de base Perl
racine carrée contient plusieurs fonctions mathématiques de base , y compris la racine carrée. Le sqrt Perl () prend la racine carrée d'un nombre donné en argument . Si l'argument n'est pas inclus, la sqrt ( ) fonction agit sur la variable $ _

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

Par défaut , en prenant la racine carrée d'un nombre négatif retourne une erreur en Perl. Toutefois, si vous avez inclus le " Math :: Complex" package, toutes les opérations mathématiques peuvent être effectuées sur les nombres complexes . Les colis sont inclus dans les fichiers Perl utilisant la commande use

utilisation Math :: Complex ; . $ My_root = racine ( -144 ) ; # rendements 12iprint $ my_root ;
d'autres racines

une racine est équivalent à un nombre élevé à une puissance fractionnaire . Pour prendre une racine autre que la racine carrée en Perl , utilisez l'opérateur "**" exponentielle avec un exposant fractionnaire . Par exemple, pour extraire la racine cubique d'un nombre , utilisez le code suivant

$ cube_root my_num = $ ** (1/3); . Print $ cube_root ;
Sample programme

Pour fonctionner pleinement un programme d'exemple en Perl pour prendre la racine carrée ou autre , exécutez le programme suivant .

#! /usr /bin /local /perl

$ my_num = 64; $ my_root = 3;

printf ' La racine carrée de % 1% d est % 2% f \\ n ". , $ my_num , sqrt ( my_num $ ) ; printf ' . % 1 % racine d de% 2% d % est de 3% f \\ n ", $ my_root , $ my_num , ( my_num $ ** (1 /$ my_root ) ) ;