9 lines
189 B
Nim
9 lines
189 B
Nim
var i: int
|
|
|
|
proc harmonicSum(i: var int; lo, hi: int; term: proc: float): float =
|
|
i = lo
|
|
while i <= hi:
|
|
result += term()
|
|
inc i
|
|
|
|
echo harmonicSum(i, 1, 100, proc: float = 1 / i)
|