cho A= (1/1,3)+(1/2,4)+(1/3,5)+...+(1/n*(n+2)) a) mô tả thuật toán để tính tổng biểu thức A b) viết chương trình tính giá trị của biểu thức A ( n là giá trị nhập từ bàn phím) giúp mik vs mik cần gấp lắm nêu các bước luôn nhé

uses crt;
var i,n:longint;
kq:real;
begin
clrscr;
write('n= '); readln(n);
for i:=1 to n do
kq:=kq + (1/(i*(i+2))) ;
write('Tong la: ',kq:0:4);
readln;
end.

Thuật toán 

Input : nhập n

Output : tính tổng A

Bước 1 : nhập n

Bước 2 : cho biến i chạy từ 1 đến n 

Bước 3: tongA<- tongA+ (1/(i*(i+2)) 

Bước 4: in ra màn hình kết quả

Bước 5 : kết thúc thuật toán 

Chương trình

Program tinnhtong;

uses crt;

var i,n:integer;

tongA: real;

begin

clrscr;

tongA:=0; 

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

for i:=1 to n do

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

write('Tong A can tim la',tongA:2:2);

readln

end.