12 lines
244 B
Text
12 lines
244 B
Text
with javascript_semantics
|
|
function sumr(integer lo, hi, term)
|
|
atom res = 0
|
|
for i=lo to hi do
|
|
res += term(i)
|
|
end for
|
|
return res
|
|
end function
|
|
|
|
function reciprocal(atom i) return 1/i end function
|
|
|
|
?sumr(1, 100, reciprocal)
|