版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

>论坛更新日志 (4915)
>考研 (2408)
>导师招生 (1124)
>虫友互识 (363)
>休闲灌水 (349)
>文献求助 (216)
>考博 (179)
>论文投稿 (139)
>硕博家园 (114)
>公派出国 (89)
>博后之家 (60)
>招聘信息布告栏 (54)
>教师之家 (42)
>基金申请 (39)
>找工作 (32)
>论文道贺祈福 (24)

返回列表

当前主题已经存档。

yongbinz

金虫 (著名写手)

应助: 6 (幼儿园)
金币: 1180.2
散金: 1415
红花: 3
帖子: 1995
在线: 892.5小时
虫号: 428019
注册: 2007-08-01
专业: 文学理论

[交流] 【讨论】一个小程序，过来讨论讨论！

我需要一个小程序，求解一个方程！
X/L=Sin(θ/2)÷( θ/2) 公式中的θ为弧度，已知X与L，输入X与L后，要能求出θ的大小。
这个程序怎么写呢，大家能否给点意见？

回复此楼

» 猜你喜欢

295求调剂已经有4人回复
290求调剂已经有5人回复
0856调剂已经有3人回复
寻找调剂已经有3人回复
312求调剂已经有4人回复
304求调剂已经有6人回复
0856材料求调剂已经有8人回复
博士自荐已经有9人回复
272求调剂已经有3人回复
311求调剂已经有3人回复

1楼 2009-06-03 10:32:30

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

gjliu

银虫 (小有名气)

应助: 0 (幼儿园)
金币: 235.4
帖子: 209
在线: 2.9小时
虫号: 13612
注册: 2003-06-01
性别: GG
专业: 信息安全

★
小木虫(金币+0.5):给个红包，谢谢回帖交流
幻影无痕(金币+0,VIP+0):呵呵，亲自上阵！鼓励一下！ 6-3 11:04

这个是一个超越方程求解的问题，可以看一些《计算方法》或者《数值分析》的书，比如牛顿迭代什么的方法都可以找到数值解的。如果是Matlab或者Mathematic等软件直接有求解方程的函数，相对比较简单。

就是不知道你要用什么语言去写。给你一个简单的例子吧

用牛顿迭代法求方程X3+4X2-10=0 的根

#include
main()
{float x,x0,f,f1;
x=1.5;
do
{x0=x;
f=x0*x0*(x0+4)-10;
f1=x0*(3*x0+8); /* f的导数，即它的切线 */
x=x0-f/f1; /* 切线与x轴的交点 */
}
while(fabs(x-x0)>=1e-5);
printf("The root is %8.7f\n",x);
}

[ Last edited by gjliu on 2009-6-3 at 11:21 ]

赞一下(21人)

回复此楼

2楼2009-06-03 11:00:49

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

yongbinz

金虫 (著名写手)

应助: 6 (幼儿园)
金币: 1180.2
散金: 1415
红花: 3
帖子: 1995
在线: 892.5小时
虫号: 428019
注册: 2007-08-01
专业: 文学理论

谢谢楼上，不过，本人就是不会C语言呀！谢谢支持！

赞一下

回复此楼

3楼2009-06-03 11:40:43

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

levone

木虫 (正式写手)

应助: 0 (幼儿园)
金币: 3974.1
红花: 1
帖子: 936
在线: 38.4小时
虫号: 477579
注册: 2007-12-13
专业: 控制理论与方法

那会什么语言？

回复此楼

莫愁前途无知己！

4楼2009-06-03 12:31:30

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

zhuzhs

金虫 (正式写手)

应助: 17 (小学生)
金币: 903.4
帖子: 554
在线: 25.5小时
虫号: 725968
注册: 2009-03-18
专业: 制造系统与自动化

maple，mathmatics

赞一下

回复此楼

当所有一切都已看平淡是否有一种精致还留在心田

5楼2009-06-06 00:14:43

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

duzhuqi

应助: (幼儿园)
在线:
虫号: 716479

★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
suton(金币+1,VIP+0):谢谢！ 6-7 09:10

MATLAB程序如下：
function y=f6(x)
y=Sin(x)/( x)-X/L;
end
----------------------------------------------------
a=-1;b=1.5;
y1=f6(a);y2=f6(b);
while abs(b-a)>0.001
x0=0.5*(a+b);y0=f6(x0);
  if abs(y0)< 0.0001
x0
elseif y0*y1<0
      b=x0;y2=y0;
else
      a=x0;y1=y0;
  end
end
x0

赞一下(7人)

回复此楼

6楼2009-06-06 22:28:45

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖