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
Sương Đặng

Hãy mô tả thuât toán để tính tổng A sau đây (n là số tự nhiên được nhập vào từ bàn phím):

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

Tú Nguyễn
17 tháng 1 2018 lúc 13:36

var n,i:longint;

a:real;

begin

write('n=');readln(n);

a:=0;

for i:=1 to n do

a:=a+1/(i*(i+2));

writeln(' Tong la: ',a);

readln;

end.

Trương Quang Dũng
17 tháng 1 2018 lúc 21:03

B1:Nhập n từ bàn phím;

B2:i:=1;s:=0;

B3:s:=s+1/i(i+2);i:=i+1;

B4:Nếu i<=n thì quay lại b3,ngược lại thông báo kết quả và kết thúc thuật toán.

Phan Tiến Đạt
30 tháng 3 2020 lúc 11:07

uses crt;

var i,n:integer;

tong: real;

begin

clrscr; tong:= 0;

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

for i:= 1 to n do

tong:= tong + (1 / (i * (i + 2)));

write('A= ',tong:0:2);

readln

end.

Khách vãng lai đã xóa