Perl eller praktiske Udvinding og rapport Sprog , er en computer scriptsprog optimeret til operationer på store mængder mønstrede data. Dog kan Perl også håndtere de fleste normale matematiske beregninger , såsom kvadratrod . Ved hjælp af eksterne pakker, kan Perl kvadratrodsfunktionen operere på ethvert format numeriske data er tilgængelige i Perl. Square Root

Perl basispakke indeholder flere grundlæggende matematiske funktioner, herunder kvadratrod . Perl sqrt ( ) funktion tager kvadratroden af ​​et vilkårligt antal givet som et argument. Hvis argumentet ikke er inkluderet, sqrt () funktionen opererer på $ _ variable

$ result = sqrt ( $ some_number ) . Print $ result ;
komplekse tal < br >

Som standard tager en kvadratroden af ​​et negativt tal returnerer en fejl i Perl. Men hvis du har medtaget " Math :: Complex "-pakke kan alle matematiske operationer udføres på komplekse tal. Pakker er inkluderet i Perl filer ved hjælp af brugen kommandoen

brug Math :: Complex , . $ My_root = sqrt ( -144 ) # returnerer 12iprint $ my_root ,
andre Rødder

en rod er svarer til et tal hævet til en fraktioneret eksponent . For at tage et rod andet end en firkantet rod i Perl, bruge den eksponentielle operatør " ** " med et fraktioneret eksponent . For eksempel , at tage kubikroden af et antal bruge følgende kode

$ cube_root = $ my_num ** (1/3 ) . Print $ cube_root ,
Sample program

fuldt indkørt en prøve -program i Perl til at tage pladsen eller andet rod , kør den følgende program.

#! /usr /bin /local /perl

$ my_num = 64; $ my_root = 3 ;

printf ' Kvadratroden af ​​% 1 % d er% 2% f \\ n ". , $ my_num , sqrt ( $ my_num ) printf ". % 1 % d roden af ​​% 2 % d er% 3% f \\ n ", $ my_root , $ my_num , ( $ my_num ** ( 1 /$ my_root ) ) ;