viết chương trình tính tổng
T=1+1/3+1/5+……….+1/2n-1
(n nhập từ bàn phím )
(1 là biến lưu các số 1,3,5,…2n-1)
Chú ý sử dụng lệnh while….do

Question

viết chương trình tính tổng T=1+1/3+1/5+..........+1/2n-1 (n nhập từ bàn phím ) (1 là biến lưu các số 1,3,5,...2n-1) Chú ý sử dụng lệnh while....do

baoquyen · Answer

program tinh_tong;

uses crt;

var n,i:integer;

t:real;

begin

clrscr;

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

i:=1; t:=0;

while i<=n do

begin

t:=t+1/(2*i-1);

i:=i+1;

end;

write(‘T= ‘,t:2:2);

readln;

end.

dananhthu · Answer

đ&acirc;y bạn

viết chương trình tính tổng T=1+1/3+1/5+–..+1/2n-1 (n nhập từ bàn phím ) (1 là biến lưu các số 1,3,5,…2n-1) Chú ý sử dụng lệnh while-do