用循环语句描述1—1/2+1/3——1/4+.+1/99—1/100的算法或者用中文告诉我算法~
问题描述：
用循环语句描述1—1/2+1/3——1/4+.+1/99—1/100的算法
或者用中文告诉我算法~
答
设计一个循环变量I,在循环语句中用判断语句,另赋值一个A吧,在判断语句后当I对I/2进行取余,当余数为1即A=A+1/I,当余数为0时,即A=A-1/A,即可
答
f=0
n=1
if
n/2=整数
f=f+1/n
else
f=f-1/n
n=n+1
n≤101 ？
真跳回if
假printff结果~~
答
var
a,i:integer;
s:real;
s:=0;
a:=1;
for i:=1 to 100 do begin
s:=s+ 1/a;
a:=a+1;
end;
writeln(s:5:5);
end.