Viết chương trình tính tổng T= $\frac{1}{2.4}$+ $\frac{1}{}4.6$+..... + $\frac{1}{98.100}$
2 câu trả lời
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.
Program tinh_tong;
Uses crt;
Var i: byte;
T: real;
Begin
T:=0;
For i:=2 to 98 do
If i mod 2= 0 then
T:=T+1/(i*(i+2));
Writeln ('Tong T la:',T:8:2);
Readln
End.
Câu hỏi trong lớp
Xem thêm