Nguyễn Lê Bảo An

Tính S = 1/(1x2) + 1/(2x3) + 1/(3x4) + ….. + 1/(n x (n+1))

Dùng chuwognf trình pascal nha

mình đang cần gấp vào chiều nay, help me

Lê Tài Bảo Châu
28 tháng 5 2020 lúc 23:08

program tinhtoan;

uses crt;

var: i;n:interger;

S:real;

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

S:=0;

For i:=1 to n*(n*1) do S:=S+\(\frac{1}{i};\)

writeln(' S=',S);

End.

(ps: ko chắc )

Khách vãng lai đã xóa

Các câu hỏi tương tự
Lê Hoàng Anh Quân
Xem chi tiết
Cíuuuuuuuuuu
Xem chi tiết
Nguyễn Bá Đức
Xem chi tiết
mai anh dung
Xem chi tiết
kudo sinhinichi
Xem chi tiết
Pham Trong Bach
Xem chi tiết
Hiền Kun's
Xem chi tiết
LeO Channel
Xem chi tiết
Nguyễn Trần Hoàng Vy
Xem chi tiết