100 call evaluation
110 end
120 sub evaluation()
130   lo = 1
140   hi = 100
150   temp = 0
160   for i = lo to hi
170     temp = temp+(1/i)
180   next i
190   print temp
200 end sub