Viết chương trình tính tổng T= $\frac{1}{2.4}$+ $\frac{1}{4.6}$ +-.+$\frac{1}{98.100}$ 09/08/2021 Bởi Margaret Viết chương trình tính tổng T= $\frac{1}{2.4}$+ $\frac{1}{4.6}$ +…..+$\frac{1}{98.100}$
Trả lời : Program vd; uses crt; var i,n:integer; S:real; Begin clrscr; write(‘Nhap n: ‘); readln(n); for i:=1 to n do S:=S+1/(i*(i+2)); writeln(‘Tong la: ‘,S:3:1); readln; End. Good luck for you???????? Bình luận
uses crt;var i : integer;t : real;begin clrscr; t:=0;for i:=1 to 100 doif i mod 2 = 0 then t:=t+1/(i*(i+2));write(‘Tong la :’, t);readlnend. Bình luận
Trả lời :
Program vd;
uses crt;
var i,n:integer;
S:real;
Begin
clrscr;
write(‘Nhap n: ‘); readln(n);
for i:=1 to n do S:=S+1/(i*(i+2));
writeln(‘Tong la: ‘,S:3:1);
readln;
End.
Good luck for you????????
uses crt;
var i : integer;
t : real;
begin clrscr; t:=0;
for i:=1 to 100 do
if i mod 2 = 0 then t:=t+1/(i*(i+2));
write(‘Tong la :’, t);
readln
end.