RosettaCodeData/Task/Jensens-Device/Ring/jensens-device.ring
2023-07-01 13:44:08 -04:00

13 lines
250 B
Text

# Project : Jensen's Device
decimals(14)
i = 100
see sum(i,1,100,"1/n") + nl
func sum(i,lo,hi,term)
temp = 0
for n = lo to hi step 1
eval("num = " + term)
temp = temp + num
next
return temp