Question

[hoàng thị anh]

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

S= 1/1.2+1/2.3+...+1/n (n+1).

Answer 1

[Luân Đào]

program help; uses crt; var i, n: integer; A: real; begin clrscr; write('Nhap so n vao: n = '); read(n); A:=0; for i:=1 to n do A:=A+1/(i*(i+1)); writeln('Tong A thu duoc la ',A); readln end.