RosettaCodeData/Task/Jensens-Device/Craft-Basic/jensens-device.basic

13 lines
119 B
Plaintext

precision 4
define lo = 1, hi = 100, temp = 0
for i = lo to hi
let temp = temp + (1 / i)
wait
next i
print temp