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
hoàng thị anh

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

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

Luân Đào
16 tháng 2 2019 lúc 19:20
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.

Các câu hỏi tương tự
Quang Ngoc
Xem chi tiết
Nguyễn Híu
Xem chi tiết
Vũ Duy
Xem chi tiết
Lâm Khả Doanh
Xem chi tiết
Phượng Hồ
Xem chi tiết
Minh Lê
Xem chi tiết
Tuấn Hưng
Xem chi tiết
Tô Quốc
Xem chi tiết
Hoàng Đình Đức Duy
Xem chi tiết