S=1+ $\frac{1}{2}$ + $\frac{1}{3}$ + $\frac{1}{4}$+...+ $\frac{1}{N}$ Dựa vào đề bài xác định Giá trị khởi tạo của S Giá trị đầu, cuối của biến đếm i Câu lệnh sẽ được lặp
1 câu trả lời
Gửi bạn:
program tinhtong;
uses crt;
var i, n : integer; S : real;
begin
clrscr;
writeln('Nhap so thu n: '); readln(n);
S:=0; i:=1;
while i<=n do begin
S:=S+1/i; i:=i+1;
end;
writeln('Tong la: ',S:2:3);
readln
end.
CHÚC BẠN HỌC TỐT !