Jensen's Device: Difference between revisions

m
Line 754:
<syntaxhighlight lang="futurebasic">
local fn JensensDevice( lo as long, hi as long ) as double
double i, temp = 0.0
for i = lo to hi
temp = temp + (1/i)
next
end fn = temp
 
715

edits