#Mathematica, <s>21</s> 20 bytes

    Sum[1/i,{i,#}]~N~10&