Viết chương trình sử dụng câu lệnh while...do tính S=1/1*2+1/2*2+1/3*2+...1/n*2

Viết chương trình sử dụng câu lệnh while...

Lê Hoài Bảo Thi Hỏi từ APP VIETJACK

· 20:56 28/03/2023

Viết chương trình sử dụng câu lệnh while...do tính S= $\frac{1}{1.2}$ + $\frac{1}{2.2}$ + $\frac{1}{3.2}$ +... $\frac{1}{n . 2}$

Trả Lời

Hỏi chi tiết

Trả lời trong APP VIETJACK

Quảng cáo

3 câu trả lời 107

Hoàng Linh

2 năm trước

program tinhtong;

var n,i : integer;

S : real;

begin

write('Nhap n: ');

readln(n);

i:=1;

S:=0;

while i<=n do

begin

S:=S+1/i*2;

i:=i+1;

end;

writeln('Tong S= ',S);

readln;

end.

(+1) 0 bình luận

Đăng nhập để hỏi chi tiết

ngoc_cuteee<3

2 năm trước

program tinh_tong;

var n,i : integer;

S : real;

begin

write('Nhap n: ');

readln(n);

i:=1;

S:=0;

while i<=n do

begin

S:=S+1/i*2;

i:=i+1;

end;

writeln('Tong S= ',S);

readln;

end.

tham khảo!

0 bình luận

Đăng nhập để hỏi chi tiết

Quốc Lê Chí

2 năm trước

program tinhtong;

var n,i : integer;

S : real;

begin

write('Nhap n: ');

readln(n);

i:=1;

S:=0;

while i<=n do

begin

S:=S+1/i*2;

i:=i+1;

end;

writeln('Tong S= ',S);

readln;

end.

0 bình luận

Đăng nhập để hỏi chi tiết

Quảng cáo

3 câu trả lời 107

Câu hỏi hot cùng chủ đề

Bài viết mới nhất Lớp 8