Viết chương trình tính tổng

viết chuương trình thính tổng s, s=1+1/2+1/3+...+1/n, với 1/n<r, r là số rất nhỏ nhập từ bàn phím