|< 1 2 3 >| | 26 Einträge, 3 Seiten |
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
package Rdw::BigInt;
sub new # construktor; als optimalen parameter kann eine große Zahl als String oder ein Object vom Typ Rdw::BigIntübergeben werden
{
# ...
}
sub set # erhält als parameter $bigint eine große Zahl als String oder ein Object vom Typ Rdw::BigInt
{
my ($self, $bigint) = @_;
# ...
}
sub add # addiert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt
{
my ($self, $bigintobj) = @_;
# ...
}
sub sub # subtraiert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt
{
my ($self, $bigintobj) = @_;
# ...
}
sub mul # multipliziert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt
{
my ($self, $bigintobj) = @_;
# ...
}
sub div # dividiert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt
{
my ($self, $bigintobj) = @_;
# ...
}
sub mod # modulo rechnung $bigintobj; $bigintobj ist vom Typ Rdw::BigInt
{
my ($self, $bigintobj) = @_;
# ...
}
sub get_data # gibt einen String zurück, der die Zahl repräsentiert
{
my ($self) = @_;
}
1;
1
2
3
4
my $bi = Rdw::BigInt->("10");
$bi->add("90");
$bi->mul("10");
print $bi->get_data(); # "1000"
$bigint + $binint2
$bigint1->add($bigint2);
$bigint += $binint2
$bigint + $binint2
$bigint1->add($bigint2);
$bigint += $binint2
|< 1 2 3 >| | 26 Einträge, 3 Seiten |