Euleresche Zahl Berechnen, mit vielen Nachkommastellen. - #111661 (Allgemeines zu Perl)

FoolAck

2008-06-29 18:58

User since
2008-05-02
69 Artikel
BenutzerIn
[default_avatar]

Hier hab ich die Formel zur Berechnung her. Und da ich mich sowieso schon länger mal mit BigFloat auseinandersetzen wollte:

Code (perl): (dl )

#!/usr/bin/env perl
use strict;
use warnings;
use Math::BigFloat;

Math::BigFloat->accuracy(100);  # default to 100 digits after the decimal dot

my $e = Math::BigFloat->bone();
my $fakulty = $e->copy();
my $tmp;

for my $n (1 .. 10) {
    $fakulty->bmul($n);
    $tmp = $fakulty->copy()->bpow(-1);
    $e->badd($tmp);
    print "$e\n";
}

Und wo wir grade dabei sind, kann mir einer sagen, warum ich da die $tmp Variable brauche? Also warum geht das nicht so:

Code (perl): (dl )

for my $n (1 .. 10) {
    $fakulty->bmul($n);
    $e->badd($fakulty->copy()->bpow(-1));
    print "$e\n";
}