2545: 内部收益率

2545: 内部收益率

Time Limit: 1 Sec  Memory Limit: 128 MB
Submit: 25  Solved: 8
[ Submit][ Status][ Web Board]

Description

在金融中，我们有时会用内部收益率IRR来评价项目的投资财务效益，它等于使得投资净现值NPV等于0的贴现率。换句话说，给定项目的期数T、初始现金流CF₀和项目各期的现金流CF₁, CF₂, ...，CF_T，IRR是下面方程的解：

 

 

 

为了简单起见，本题假定：除了项目启动时有一笔投入（即初始现金流CF₀ < 0）之外，其余各期均能赚钱（即对于所有i=1,2,...,T，CF_i> 0）。根据定义，IRR可以是负数，但不能大于-1。

 

 

输入

输入文件最多包含25组测试数据，每个数据占两行，第一行包含一个正整数T（1<=T<=10），表示项目的期数。第二行包含T+1个整数：CF₀, CF₁, CF₂, ..., CF_T，其中CF₀< 0, 0 < CF_i< 10000 (i=1,2,...,T)。T=0表示输入结束，你的程序不应当处理这一行。

 

输出

对于每组数据，输出仅一行，即项目的IRR，四舍五入保留小数点后两位。如果IRR不存在，输出"No"，如果有多个不同IRR满足条件，输出"Too many"（均不含引号）

Input

Output

Sample Input

1
-1 2
2
-8 6 9
0

Sample Output

1.00
0.50

#include<stdio.h>
#include<math.h>
double cf[30];
int main()
{int n;while(scanf("%d",&n)!=EOF){if(n==0)break;int i,j;double s,f,x,l,r,m;for(i=0;i<=n;i++)scanf("%lf",&cf[i]);cf[0]=cf[0]*(-1.0);l=-1.0;r=1e6;while(fabs(cf[0]-s)>1e-7){s=0;f=1.0;m=l+(r-l)/2;for(j=1;j<=n;j++){f=f/(1+m);s=s+cf[j]*f;}if(s>cf[0])l=m;elser=m;}printf("%.2lf\n",m);}return 0;
}