Jensen's Device: Difference between revisions

Content deleted Content added
Line 162: Line 162:
=={{header|Haskell}}==
=={{header|Haskell}}==
<pre>
<pre>
main = print (sum (map recip [1 .. 100]))
main = print (sum [ 1/n | n <- [1..100] ])
</pre>
</pre>
</pre>
Output: 5.187377517639621
Output: 5.187377517639621