Bài 7. Câu lênh lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Sherry Lê

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

\(\dfrac{1}{1.3}\)+\(\dfrac{1}{2.4}\)+\(\dfrac{1}{3.5}\)+...\(\dfrac{1}{n\left(n+2\right)}\)

Do Pham Ngoc Anh
20 tháng 1 2018 lúc 18:39

uses crt;

var i,n:integer; S:real;

Begin

clrscr;

write('Nhap n: '); readln(n);

for i:=1 to n do S:=S+1/(i*(i+2));

writeln('Tong la: ',S:3:1);

readln

End.