级数求和
题目
级数求和
已知：Sn= 1＋1／2＋1／3＋…＋1／n.显然对于任意一个整数K,当n足够大的时候,Sn大于K.
现给出一个整数K（1
答案
program ex;
var
sn:real;
k,n:longint;
begin
readln(k);
n:=1;sn:=0;
repeat
sn:=sn+1/n;
n:=n+1;
until sn>k;
write(n-1);
end.
不要老靠别人,Pascal只有靠自己才能学好
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点