S= 1/2+2/5+3/10+.....+n/(n^2+1)+....

1 câu trả lời

program tinh;

uses crt;

var i , n : integer;

      s : real;

begin

clrscr;

s := 0;

write('nhap so n :');readln(n);

for i := 1 to n do 

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

writeln(' tong s la :', s:8:2);

readln

end.

Câu hỏi trong lớp Xem thêm