Question

Pascal编程实现计算：1+1/2+1/3+......+1/n的值（n由键盘输入）

program v3;
var i,n,s:real;
begin
writeln('input n:');
readln(n);
s:=0;i:=1;
for i:=1 to n do
begin
s:=s+1/i;
i:=i+1;
writeln('n=',n:8:2);
end;
readln
end.
调试通不过，帮着查一下哪里错了...

Answer 1

var s:real;
i,n:Integer;
begin
writeln('input n:');
readln(n);
s:=0;i:=1;
for i:=1 to n do
begin
s:=s+1/i;
writeln('n=',n);
end;
Writeln('s=',s);
end.
首先 循环里面 要用integer 变量。
这个代码可以通过

Answer 2

你好，i是real，不能作循环变量，再说在for循环里，是不能给循环变量赋值的。
O(∩_∩)O~

Answer 3

循环变量i不能在循环中加减乘除。