Question

cho S=\(\dfrac{1}{2}+\dfrac{3}{4}+\dfrac{6}{5}+..........+\dfrac{2n-1}{2n}\)

viết chương trình nhập số nguyên n (1<=n<=32000) từ bàn phím và in ra màn hình giá trị của S.

Answer 1

Program bai1;

uses crt;

var n,i: integer;

s:real;

begin

clrscr;

s:=0;

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

for i:= 1 to n do

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

writeln('S = ' ,s :4:2);

readln;

end.

Answer 2

var n,i:integer;

s:real;

begin

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

s:=0;

for i:=1 to n do s:=s+(2*i-i)/(2*i);

writeln(' tong la : 's)

readln;

end.

Answer 3

Có ai biết viết thuật toán bài này dạng liệt kê hoặc sơ đồ khối ko giúp mk cái thank mọi người nha.