Dùng pascal để tính tổng

Dùng pascal để tính tổng S=1/(1+37)+1/(1+38)+1/(1+39)+...+1/1+n
VD:
nhập n từ bàn phím
n>STT (37)