I'm somewhat sure that took less time and was more maths-y than using OO ;-)pdl> $n = sequence(15)+1 pdl> p $a = 1 + 1/$n [2 1.5 1.33333333333333 1.25 1.2 1.16666666666667 1.14285714285714 1.1 +25 1.11111111111111 1.1 1.09090909090909 1.08333333333333 1.076923076 +92308 1.07142857142857 1.06666666666667] pdl> p $s = $a->sumover 18.318228993229
In reply to Re: Solving a maths problem with Perl
by etj
in thread Solving a maths problem with Perl
by tobyink
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |