Continued fraction: Difference between revisions
m
→{{header|Perl}}: missing semcolon
(→{{header|Perl}}: using persistent private variables) |
m (→{{header|Perl}}: missing semcolon) |
||
Line 662:
# using persistent private variables
use feature 'state';
printf "e ≈ %.9f\n", continued_fraction sub { state $n; $n++ ? $n-1 : 2 }, sub { state $n; $n++ ? $n-1 : 1 };
printf "τ ≈ %.9f\n", continued_fraction sub { 6 }, sub { state $n; $n++ ? (2*$n - 1)**2 : 2 }, 1_000;
|