Jensen's Device: Difference between revisions
Content added Content deleted
(add m4) |
(J) |
||
Line 234:
</pre>
Output: 5.187377517639621
=={{header|J}}==
<lang J>jensen=:monad define
'name lo hi expression'=:y
temp=. 0
for_n.lo (i.@>:@-~ + [) hi do.
(name)=. n
temp=.temp+".expression
end.
)</lang>
jensen 'i';1;100;'1%i'
5.18738
=={{header|M4}}==
|