Những câu hỏi liên quan
DN
Xem chi tiết
H24
Xem chi tiết
EG
Xem chi tiết
H24
Xem chi tiết
DK
Xem chi tiết
LG
Xem chi tiết
ML
14 tháng 3 2023 lúc 19:39

Sửa lại đề bài : \(A=....+\dfrac{1}{n\left(n+2\right)}\)

Program HOC24;

var i,n: integer;

a: real;

begin

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

a:=0;

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

write('A = ',a:6:2);

readln

end.

Bình luận (0)
KH
Xem chi tiết
NT
25 tháng 1 2021 lúc 18:54

Thuật toán: 

Bước 1: Nhập n

Bước 2: i←1; a←0;

Bước 3: a←a+1/(i*(i+2));

Bước 4: i←i+1;

Bước 5: Nếu i<=n thì quay lại bước 3

Bước 6: xuất a

Bước 7: Kết thúc

Viết chương trình:

uses crt;

var a:real;

i,n:longint;

begin

clrscr;

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

a:=0;

for i:=1 to n do

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

writeln(a:4:2);

readln;

end.

Bình luận (3)
BT
25 tháng 1 2021 lúc 19:38

Bình luận (0)
NB
Xem chi tiết
DP
Xem chi tiết