Sum of a series: Difference between revisions
Content deleted Content added
→{{header|Forth}}: added haskell |
Added Perl version. |
||
| Line 86: | Line 86: | ||
} |
} |
||
} |
} |
||
=={{header|Perl}}== |
|||
<pre>my $sum = 0; |
|||
map { $sum += 1 / ( $_ * $_ ) } (1..1000); |
|||
print "$sum\n"; |
|||
</pre> |
|||