aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

June 2018 Update

Browse source
This commit is contained in:
Ingy döt Net 2018-06-22 20:57:24 +00:00
parent ba8067c3b7
commit 22f33d4004
5278 changed files with 84726 additions and 14379 deletions
Download patch file Download diff file Expand all files Collapse all files

16
Task/Jensens-Device/Ring/jensens-device.ring Normal file
View file

@ -0,0 +1,16 @@
# Project : Jensen's Device
# Date : 2018/01/31
# Author : Gal Zsolt [~ CalmoSoft ~]
# Email : <calmosoft@gmail.com>
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