1+1/2+1/3+1/4+.............+1/n得值?
来源:百度知道 编辑:UC知道 时间:2024/06/09 12:19:09
可以回答这个的值 或者这个编程的代码也行 最好是C++的代码
楼上的老兄,程序那样写就没有灵活性了
#include "iostream.h"
double result(int n);
void main()
{
int n=0;
cin>>n;
cout<<result(n)<<endl;
}
double result(int n)
{
int N=n;
double sum=0;
for(int i=1;i<=N;i++)
sum+=1.0/i;
return sum;
}
//这个程序的n是任意决定的,要看你要数据的准确度了,如果要很准确的话就输入n的值大一点,一般1000就可以精确到了小数点后4位了
VB 的 看看吧,没装C++,手动写不好
Public Function ADDNum(N As Double) As Double
Dim i As Long, a As Double
For i = 1 To N
a = a + 1 / i
Next
ADDNum = a
End Function
子程序调用测试代码
Private Sub Command1_Click()
MsgBox ADDNum(Val(Text1.Text))
End Sub
#include<iostream>
using namespace std;
unsigned int n=25;
int main()
{
double sub=0;
for(int i=1;i<=n;i++)
sub=sub+1.0/i;
cout<<sub<<endl;
return 1;
}
(1/2005-1)(1/2004-1)........(1/3-1)(1/2-1)
1+1/2+1/3+.....+1/n
1+1/2+1/3+...+1/100
1-1/2+1/3-.....-1/10
(1+1/2+1/3+1/4)×
(1-1/2)(1-1/3)(1-1/4)(1-1/5).....(1-1/1000)
1+1/(1+2)+1/(1+2+3)+...+1/(1+2+3+...+100)
1+1/(1+2)+1/(1+2+3)+-------+1/(1+2+3+----+100)
1+1/1+2+1/1+2+3+...+1/1+2+3...+2000
1+1/1+2+1/1+2+3.........+1/1+2+3.....100