Perl oder Practical Extraction und Report Language , ist ein Computer- Scripting-Sprache für den Betrieb auf große Mengen von strukturierten Daten optimiert. Allerdings kann Perl auch mit den meisten üblichen mathematischen Berechnungen , wie Quadratwurzel. Durch die Verwendung von externen Paketen kann das Perl Quadratwurzel -Funktion auf einem beliebigen Format von numerischen Daten in Perl arbeiten. Quadratwurzel

Perl Basispaket enthält mehrere grundlegende mathematische Funktionen, einschließlich der Quadratwurzel. Die Perl sqrt ()-Funktion nimmt die Quadratwurzel aus einer beliebigen Anzahl als Argument angegeben . Wenn das Argument nicht enthalten ist, die sqrt ()-Funktion arbeitet auf der Variable $ _

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

standardmäßig Ziehen einer Quadratwurzel aus einer negativen Zahl gibt einen Fehler in Perl . Allerdings, wenn Sie die " Math :: Complex " -Paket enthalten sind, können alle mathematischen Operationen auf komplexen Zahlen durchgeführt werden. Pakete werden in Perl -Dateien mit dem Befehl use enthalten

Verwendung Math :: Complex ; . $ My_root = sqrt ( -144 ); # Renditen 12iprint $ my_root ;
Andere Roots

Eine Wurzel ist äquivalent zu einer Zahl mit einer fraktionierten Exponenten. Um einen Root als eine Quadratwurzel in Perl zu nehmen , verwenden Sie die exponentielle Operator "**" mit einem gebrochenen Exponenten. Zum Beispiel, um die Kubikwurzel einer Zahl zu gelangen, verwenden Sie den folgenden Code

$ cube_root = $ my_num ** (1/3 ); . Print $ cube_root ;
Probe Programm

voll laufen eine Probe Programm in Perl , um das Quadrat oder andere Wurzel zu nehmen, führen Sie das folgende Programm .

#! /usr /bin /local /perl

$ my_num = 64; $ my_root = 3;

printf " Die Quadratwurzel von % 1% d % 2% f \\ n . ' $ my_num , sqrt ( $ my_num ); printf ' . Die % 1 % d Wurzel % 2% d % 3% f \\ n " , $ my_root , $ my_num , ($ my_num ** (1 /$ my_root ) ) ;