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à g

0 bình luận về “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à g”

1. 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.

   Bình luận

2. 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.

   Bình luận