Bài 7. Câu lênh lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
T__T

Tính tổng dãy số sau:

1+\(\frac{1}{1+3}\)+\(\frac{1}{3+5}+\frac{1}{5+7}\)+.....+ \(\frac{1}{n.\left(n+2\right)}\)

Nguyễn Lê Phước Thịnh
16 tháng 6 2020 lúc 21:44

uses crt;

var n,i:integer;

s:real;

begin

clrscr;

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

s:=1;

for i:=1 to n do

s:=s+1/(i+(i+2));

writeln('Ket qua la: ',s:4:2);

readln;

end.

Minh Lệ
16 tháng 6 2020 lúc 21:45

Program HOC24;

var t: real;

i,n: integer;

begin

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

t:=1;

for i:=1 to n do

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

write('Tong cua day so la : ',t);

readln

end.


Các câu hỏi tương tự
Cold Wind
Xem chi tiết
Nitrox vntm
Xem chi tiết
Huỳnh Thị
Xem chi tiết
Krissy
Xem chi tiết
Sách Giáo Khoa
Xem chi tiết
Mạnh Dương Nguyễn
Xem chi tiết
Duongtrucqui
Xem chi tiết
Trần Bảo Khanh
Xem chi tiết
nattly
Xem chi tiết