10 lines
155 B
Text
10 lines
155 B
Text
|
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
|
||
|
|
|
||
|
|
Evaluation()
|