Dùng pascal để tính tổng S=1/(1+37)+1/(1+38)+1/(1+39)+...+1/1+n VD: nhập n từ bàn phím n>STT (37)
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
27 tháng 12 2021
Chắc chắn sẽ phải khai báo rồi bạn, và bạn nên khai báo kiểu số thực tại vì số thực nó rộng hơn số nguyên
27 tháng 12 2021
nếu đề có ghi chia hoặc dấu / thì nên khai báo kiểu số thực để hiện các số thập phân
uses crt;
var S:real;
i,n:integer;
begin
clrscr;
write('n = ');
readln(n);
for i:=37 to n do S:=S+1/(1+i);
write('S = ',S:8:2);
readln
end.