不是VIP会员，不能显示答案

题目解答

题目：
要求以下程序的功能是计算：.s=1+1/2+1/3+...+1/50
var n:integer; s:real;
begin
s:=1.5;
for n:=50 downto 3 do
s:=s+1 div n;
writeln(s:6:4);
end.
程序运行后输出结果错误，导致错课结果的:
  • A.s:=1.5
  • B.for n:=50 downto 3 do
  • C.s:=s+1 div n
  • D.writeln(s:6:4)
考点：
分析：
解答：
评论：
老师：