| 查看: 1639 | 回复: 9 | ||
| 本帖产生 1 个 博学EPI ,点击这里进行查看 | ||
[求助]
【求助】如何解这样的方程组【有效期至2011年4月30日】
|
||
|
见图片: 如何求解这样的方程组,内含两个未知数,其中一个是角度,求matlab高手给出详细编程过程,其它求解过程也可以,只要给出详细的求解过程即可。 其中:L,R, r为已知, L=3600,R=600,r=200,求h和A 只有结果不予奖励,小木虫藏龙卧虎,期待高人指点!!! |
» 猜你喜欢
工科08-机械专硕-求调剂
已经有3人回复
一志愿苏州大学材料工程(085601)专硕有科研经历三项国奖两个实用型专利一项省级立项
已经有9人回复
材料工程302分求调剂
已经有8人回复
315求调剂
已经有14人回复
307分材料专业求调剂
已经有7人回复
材料调剂
已经有11人回复
262求调剂
已经有6人回复
一志愿北京交通大学材料工程总分358求调剂
已经有4人回复
一志愿青科085500,初试295分,公共课213分
已经有3人回复
304求调剂
已经有3人回复


2楼2011-04-18 22:41:34

3楼2011-04-18 22:57:57

4楼2011-04-18 23:27:09

5楼2011-04-18 23:57:59

6楼2011-04-19 15:35:10
【答案】应助回帖
20707311(金币+30): 先给5个,如果能给一个C程序,再把剩下的给你 2011-05-05 15:44:54
|
我也解一超越方程,这是Fortran的code! IMPLICIT REAL*8(A-H,O-Z) PARAMETER (Pi=3.1415926535,G=0.618) S=0.21240 EM=1.0E-5 DO I=1,8 Xn=Pi*(I+0.5) X2=0.5 X1=0.0 E2=2.0 333 IF(E2.GT.EM) THEN X=G*(X2-X1)+X1 Xv=Xn-X Y1=Xv-S Y2=TAN(Xv) E2=ABS(Y1-Y2) IF (Y1.GT.Y2) THEN X2=X ELSE X1=X ENDIF GOTO 333 ENDIF WRITE(*,*) X END DO END |

7楼2011-05-01 20:56:04

8楼2011-05-03 07:39:16

9楼2011-05-03 13:04:58

10楼2011-05-05 15:43:59














回复此楼