10 lines
159 B
Text
10 lines
159 B
Text
Evaluation()
|
|
end
|
|
|
|
sub Evaluation()
|
|
lo = 1 : hi = 100 : temp = 0
|
|
for i = lo to hi
|
|
temp = temp + (1/i) //r(i)
|
|
next i
|
|
print temp
|
|
end sub
|