Jensen's Device: Difference between revisions
Content added Content deleted
Basicgames (talk | contribs) |
No edit summary |
||
Line 587: | Line 587: | ||
<pre> |
<pre> |
||
5.1873775176396215 |
5.1873775176396215 |
||
</pre> |
|||
=={{header|EMal}}== |
|||
<syntaxhighlight lang="emal"> |
|||
fun sum = real by int lo, int hi, fun term |
|||
real temp = 0.0 |
|||
for int i = lo; i <= hi; ++i do temp += term(i) end |
|||
return temp |
|||
end |
|||
writeLine(sum(1, 100, real by int i do return 1.0/i end)) |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
<pre> |
|||
5.1873775176396202608051176755 |
|||
</pre> |
</pre> |
||