二分求根

#include#includedouble getfunc(double n){ return 2*n*n*n-4*n*n+3*n-6;}int main(){ double left,right; double mid=0; scanf("%lf%lf",&left,&right); while(left mid = (left + right)/(doub
摘要由CSDN通过智能技术生成





#include<stdio.h>
#include<stdlib.h>

double getfunc(double n){
   
	return 2*n*n*n-4*n*n+3*n-6;
}

int main()
{
   
	double left,right;
	double mid=0;
	scanf("%lf%lf",&left,&right);
	

	while(left < right){
   
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
要使用Fortran编写二分法求根的程序,你可以按照以下步骤进行: 1. 首先,定义一个函数,该函数输入一个数值 x,并返回一个对应的函数值 f(x)。这个函数是你要求根的方程。 2. 编写一个子程序,用于实现二分法。这个子程序将使用递归或循环来逐步缩小根的范围,直到找到一个满足要求的近似根。 下面是一个简单的Fortran代码示例,演示了如何使用二分法求解方程的根: ```fortran program bisection_method implicit none ! 定义方程函数 real function f(x) real, intent(in) :: x f = x**2 - 4 ! 这里以求解 x^2 - 4 = 0 为例 end function f ! 定义二分法子程序 real function bisection(a, b) real, intent(in) :: a, b real :: c, fa, fb, fc do while (abs(b - a) > 1e-6) ! 设置迭代终止条件 c = (a + b) / 2.0 ! 计算中点 c fa = f(a) fb = f(b) fc = f(c) if (fa * fc < 0) then b = c else a = c end if end do bisection = c ! 返回近似根的值 end function bisection ! 主程序 real :: root root = bisection(0.0, 2.0) ! 在区间 [0, 2] 中求根 print *, "Root:", root end program bisection_method ``` 在上面的示例中,我们定义了一个方程函数 f(x),该函数计算方程 x^2 - 4 的值。然后,我们使用二分法子程序 bisection 来求解该方程的根。在主程序中,我们调用 bisection 函数并打印出根的值。 请注意,上述代码仅为示例,你需要根据你要解决的具体问题自行修改方程函数和迭代终止条件等。希望能帮到你!

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值